ich öffne einen dialog, nach dessen schließen
steht die gewählte datei im Edit1-Feld
Delphi-Quellcode:
OpenDialog1.Execute;
Edit1.Text := OpenDialog1.FileName;
Label1.Caption := (IntToStr( GetFileSizeA(''+Edit1.Text+'') ));
Die Dateigröße wird ins Label geschrieben. aber in BYTES..
soweit bin ich zum glück, aber wie bekomme ich aus den Bytes Kilobytes?
--------------
Delphi-Quellcode:
var
byte, umrechnen, kb, ergebnis : String;
...
byte := (IntToStr( GetFileSizeA(''+Edit1.Text+'') ));
kb := IntToStr(1024);
umrechnen := byte*IntToStr(kb);
Label1.Caption := umrechnen;
das funktioniert leider nicht..