.: CheckIt! :.

[Chrissi91]

Sorry, wenn ich mich jetzt blöd anstelle, aber bei mir funktioniert es nicht ganz:

Ich konnte die Unit erfolgreich unter Uses einbinden . Kompilieren lässt sich das Pogramm auch schon.

Wenn ich jetzt folgenden Code habe, meckert er:

Delphi-Quellcode:

AssignFile(datei1,edit1.text);
Reset(datei1, 1);
AssignFile(datei2,edit2.text);
Reset(datei2, 1);
 repeat
  if (HashFile(Datei1) <> HashFile(Datei2)) THEN
   begin
    label5.caption:=Inttostr(strtoint(label5.caption)+1);
   end;
 until eof(datei1) or eof(datei2);
closefile(datei1);
closefile(datei2);

[Error] Incompatible types: 'String' and 'file'

filetostr gibt es nicht, oder?