Textdatei löschen oder leeren

[mitchel]

Hi,
eigentlich eine ganz einfache Frage, habe aber leider keinen Befehl dafür gefunden!
Ich habe eine Textdatei, welche beim Beenden des Programms gelöscht oder die Werte entfernt werden sollen.
Wie lautet der Befehl dafür???

Vielen Dank!

[MacGuyver]

Moin,

such mal nach EraseFile.

Stefan

[BennyM]

servus,

oder nimm doch einfach deletefile(datei)

Mfg
Benny

[marabu]

Hallo,

so bleibt die Datei erhalten, nur der Inhalt wird entfernt:

Delphi-Quellcode:

procedure EmptyFile(const fn: TFileName);
begin
  with TFileStream.Create(fn, fmOpenReadWrite or fmShareDenyWrite) do
  try
    Size := 0;
  finally
    Free;
  end;
end;

Grüße vom marabu