Hallo,
also ich schreibe grade an einem Update Programm und es ist so das er vor dem Download vom Server gucken soll wie groß die Datei ist und das mit der letzten Dateigröße vergleichen.
hab es mal so versucht:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var f: file of byte;
size: longint;
s: string;
begin
assignfile(f,'//192.168.2.148/infos/edv/update.exe');
reset(f);
try
size:=filesize(f);
s:='Datei ist '+ IntToStr(size)+ ' Bytes groß!';
showmessage(s);
finally
closeFile(f);
end;
end;
Aber das gibt einen Fehler zurück, wenn ich den Pfad auf C:\update.exe ändere geht es aber ich möchte die datei eigentlich vorher nicht downloaden sondern erstmal gucken wegen der Größe.
kann mir da jemand einen Tip geben?
gruß Jority