|
Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.537 Beiträge
Delphi 11 Alexandria
|
Re: Dateigröße als String ausgeben
28. Feb 2009, 14:24
Dann nimm aber die Tippfehler noch raus.
Delphi-Quellcode:
wfd: TWin32FINDDATA;
...
fFile := FindFirstfile(PChar(FileName), wfd);
...
Size := ((wfd.nfileSizeHigh * (int64(MAXDWORD) + 1)) + wfd.nFileSizeLow) / Divisor;
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|