Zitat von
omata:
Hallo,
Delphi-Quellcode:
procedure DateiLeeren(Dateiname:string);
var Datei:Textfile;
begin
try
assignfile(Datei, Dateiname);
rewrite(Datei);
finally
closefile(Datei);
end;
end;
Gruss
Thorsten
vielen dank für deine Antwort. Hast du mit
Dateiname : "Inhalt"
datei: "textdatei"
so gemeint??