summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorErich Eckner <git@eckner.net>2020-06-23 13:55:46 +0200
committerErich Eckner <git@eckner.net>2020-06-23 13:55:46 +0200
commit87f22f27494d806d5273f0e808c33115ae7dd3c9 (patch)
tree15ed59ebffeda56c5e551c3c7f7e4a28705a9e31
parent2b3381a31612aac1f088535346ee207aa2d7f9e7 (diff)
downloadFH-Wetter-87f22f27494d806d5273f0e808c33115ae7dd3c9.tar.xz
fhunit.pas: fix some warning
-rw-r--r--fhunit.pas4
1 files changed, 3 insertions, 1 deletions
diff --git a/fhunit.pas b/fhunit.pas
index 04dd1bf..7ac67b7 100644
--- a/fhunit.pas
+++ b/fhunit.pas
@@ -552,7 +552,7 @@ var
pt: pointer;
len: longint;
s: string;
- i: longint;
+ i: longint;
begin
if not fileexists(von) then begin
writeln('Messwertedatei '''+von+''' existiert nicht!');
@@ -560,6 +560,8 @@ begin
exit;
end;
+ s:='';
+
loadFromGeneric(von,pt,len);
if pLongint(pt)^ <> 314159265 then begin // magische Zahl nicht gefunden -> Rückfallebene: Text!