Entwickler-Ecke

Dateizugriff - Textdatei leer?


Kurdt67 - So 27.02.05 16:49
Titel: Textdatei leer?
Wie kann ich einfach überprüfen ob eine Textdatei völlig leer ist?
Ich hab das mal so probiert :

Delphi-Quelltext
1:
IF filesize(datei)=0 THEN ...                    

brachte aber nicht den gewünschten erfolg. Geht das irgendwie anders?


Moderiert von user profile iconraziel: Topic aus VCL (Visual Component Library) verschoben am So 27.02.2005 um 17:21
Moderiert von user profile iconraziel: Code- durch Delphi-Tags ersetzt.


Larus - So 27.02.05 16:53

die textdatei in nen string laden überprüfen ob der ='' is und wenn ja dann... geht aber dann nur bei *.log oder *.txt weil oder auch noch bei ein paar anderen dateien.... bei word dokumenten würd das glaub ich schon nicht mehr klappen weil da automatisch was drinsteht (glaub ich)


cartridge - Di 01.03.05 22:28

TFileStream.Size müsste weiter helfen:

Einen FileStream ünber die Datei stülpen und die Größe mit Size auslesen. Dann klappt es auch mit großen Dateien.


jasocul - Mi 02.03.05 08:18

Oder FindFirst benutzen und das TSearchRec auswerten. Dann muss die Datei nicht eingelesen werden. Hat bei großen Dateien bestimm einen Vorteil. :roll: