![]() |
GetFileSize Aufbau - Größe einer Datei ermitteln
Die Hilfe zu GetFileSize in delphi ist sowas von mau. Kennt jemand die Synax dieses befehls? Oder eine andere Funktion um herauszufinden wie groß eine Datei ist?
|
Re: GetFileSize Aufbau - Größe einer Datei ermitteln
Hi!
Eine einfache Google-Suche zeigt: ![]() Ciao Frederic |
Re: GetFileSize Aufbau - Größe einer Datei ermitteln
Bin ich zu doof oder???
Delphi-Quellcode:
:wall:
procedure TForm2.Button1Click(Sender: TObject);
var i:Cardinal; begin i := getfilesize('c:\autoexec.bat'); showmessage(IntToStr(i)); end; Fehler: i := getfilesize('c:\autoexec.bat'); Inkompatibe Typen: String und Cardinal habs auch so probiert: i := getfilesize('c:\autoexec.bat', true); dann kamm der Fehler zu viele Parameter. sollte doch eigentlich so gehen? :wall: |
Re: GetFileSize Aufbau - Größe einer Datei ermitteln
Hi!
Hast du auch nur einmal in meinem Link reingeschaut?
Delphi-Quellcode:
Da steht was von einem Handle und dann lies am besten nochmal unter dem Link nach...
FileSize := GetFileSize(FileHandle, nil);
Ciao Frederic |
Re: GetFileSize Aufbau - Größe einer Datei ermitteln
Oder auch die DP-Suche liefert einiges.
![]() ![]() ![]() |
Re: GetFileSize Aufbau - Größe einer Datei ermitteln
Die Dateigröße kann man auch mithilfe von FindFirst ermitteln.
|
Re: GetFileSize Aufbau - Größe einer Datei ermitteln
Ich habs jetzt:
Delphi-Quellcode:
:angel2:
procedure TForm2.Button1Click(Sender: TObject);
var i: Integer; f: File of Byte; s: String; begin s := 'I:\XXXXXXXXXXXX\Software\XXXXXx\database.DB'; AssignFile(f,s); Reset(f); i := FileSize(f); CloseFile(f); showmessage(IntToStr(i)); end; |
Re: GetFileSize Aufbau - Größe einer Datei ermitteln
Hoffentlich ist "I:" kein CDROM-Laufwerk... :roll:
|
Re: GetFileSize Aufbau - Größe einer Datei ermitteln
Zitat:
Flare |
Re: GetFileSize Aufbau - Größe einer Datei ermitteln
Zitat:
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 04:01 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz