[DELPHI] Nadpisywanie plików

Jak nadpisać plik tekstowy?!

FileAssign i potem Rewrite [nadpisanie] lub Append [dopisanie].

--
Vogel [Delphi 6 PE]

Life is just a dream, you know...
[Cowboy Bebop]

var Plik : TextFile;
begin
AssignFile(plik,'zazwa.txt');
ReWrite(plik);
//tutaj zapisy
CloseFile(plik);
end;

--
People=Shit