Erase Turbo Pascal

aus Paswiki Turbo Pascal, der freien Wissensdatenbank

Beschreibung

Der Befehl erase löscht eine Datei die vorher mit assign definiert wurde.

Deklaration

procedure Erase(var f);

Beispielprogramme

begin
assign(a,'test.txt');
append(a);
write(a,'test..test..test');
close(a);
writeln('Schreibvorgang beendet');
readln;
writeln('bei Tastendruck wird die Datei wieder gelöscht');
erase(a);
end.