Pliki » Operacje

Rewrite

ReWrite
Moduł: System

procedure Rewrite(var F: File [; Recsize: Word ] );

Tworzy nowy plik i otwiera go do zapisu.

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ż: