Index: ProScan/UI/LoginScherm2.pas =================================================================== diff -u -r632 -r633 --- ProScan/UI/LoginScherm2.pas (.../LoginScherm2.pas) (revision 632) +++ ProScan/UI/LoginScherm2.pas (.../LoginScherm2.pas) (revision 633) @@ -128,10 +128,10 @@ function TfmLoginScherm2.GeefVersieNummer: string; var - Rec: LongRec; + rec: LongRec; begin - Rec := LongRec(GetFileVersion(ParamStr(0))); - Result := Format('%d.%d', [Rec.Hi, Rec.Lo]) + rec := LongRec(GetFileVersion(ParamStr(0))); + result := Format('%d.%d', [rec.Hi, rec.Lo]) end; end.