Hi,
du gehst da ein wenig falsch an die Sache ran. FileSize gibt dir die Anzahl der Datensätze einer typisierten Datei zurück, bei einer .exe müsstest du also File of Byte nehmen.
Du kannst dir die Informationen aber auch direkt mit findFirst holen:
Delphi-Quellcode:
function getFileSize : Integer;
var searchRecord : TSearchRec;
begin
if findFirst(PFAD_ZU_DER_DATEI, faAnyFile, searchRecord) = 0 then
begin
result := searchRecord.Size;
end
else
begin
result := -1; // datei nicht gefunden
end;
end;
Gruß Der Unwissende