Rewrite
Adam Boduch
ReWrite
Moduł: System
ReWrite tworzy nowy plik o nazwie przypisanej do parametru F. Wcześniej należy skorzystać z procedury AssignFile aby skojarzyć typ plikowy ze ścieżką pliku.
Przykładowy kod powoduje utworzenie na dysku C: pliku foo.txt, z treścią Hello World
:
program Foo;
{$APPTYPE CONSOLE}
var
TF : TextFile;
begin
AssignFile(TF, 'C:\Foo.txt');
try
ReWrite(TF);
Writeln(TF, 'Hello World!');
finally
CloseFile(TF);
end;
end.
Jeżeli plik o danej nazwie istnieje, zostanie nadpisany. Jeżeli plik F jest już otwarty; zostanie najpierw zamknięty.
Procedura ReWrite
posiada drugi, opcjonalny parametr Recsize. Jest on używany tylko w wypadku, gdy otwieramy plik typowany. Określa on rozmiar rekordu używanego w operacjach. Jeżeli wartość nie zostanie podana, domyślny rozmiar rekordu będzie ustawiony na 128 bajtów.
Zobacz też: