From 87f22f27494d806d5273f0e808c33115ae7dd3c9 Mon Sep 17 00:00:00 2001 From: Erich Eckner Date: Tue, 23 Jun 2020 13:55:46 +0200 Subject: fhunit.pas: fix some warning --- fhunit.pas | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) 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! -- cgit v1.2.3-54-g00ecf