Hallo, die Dateigröße habe ich mit
Delphi-Quellcode:
var
sr : TSearchRec;
begin
if FindFirst('c:\test123.exe', faAnyFile, sr) = 0 then
begin
if sr.Size div 1024 > 100 then showmessage ('Die Datei ist größer als 100 kb')
end;
FindClose(sr);
u.s.w. ermittelt
Ok, das ist nicht das Problem.
Ich würde jetzt gerne die eigene Dateigröße herausfinden.
Dabei soll das auch funktionieren, selbst wenn die Datei umbenannt wird.
MfG Felix