Rewrite

Vytvoří a otevře nový soubor.

Deklarace

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

Režim

Windows, Reálný, Chráněný

Poznámky

F je proměnná kteréhokoli z typů soubor, sdružená s vnějším souborem pomocí procedury Assign. RecSize je nepovinný výraz typu Word, který lze použít pouze v případě, že soubor F je beztypový (untyped). Je-li F beztypový soubor, RecSize určuje velikost záznamu, která se má použít v datových přenosech. Není-li RecSize zadáno, předpokládá se implicitní velikost záznamu 128 bajtů.

Rewrite vytvoří nový vnější soubor, jehož jméno bylo přiřazeno k F. Pokud již soubor stejného jména existuje, je zrušen a na jeho místě se vytvoří nový prázdný soubor. Pokud byl soubor F již otevřený, je nejprve zavřen a pak znovu vytvořen. Ukazatel pozice se nastaví na začátek souboru.

Pokud je proměnné F přiřazeno prázdné jméno (např. voláním Assign(F, ), po zavolání Rewrite odkazuje F na standardní výstupní soubor (standardní madlo 1).

Pokud je proměnná F textovým souborem, stane se F souborem "jen pro zápis". Po zavolání Rewrite je Eof(F) vždy True.

V režimu {$I-} vrací funkce IOResult hodnotu 0, pokud operace proběhla úspěšně, jinak vrátí nenulový kód chyby.

Viz také

Append

Assign

Reset

Truncate

Vzorový příklad

{Rewrite.PAS}
{Vzorový příklad pro proceduru Rewrite.}
{ Pro Windows: }
{ uses WinCrt; }
var F: Text;
begin
  Assign(F, 'NEWFILE.$$$');
  Rewrite(F);
  Writeln(F, 'Byl vytvořen soubor, obsahující tento text...');
  Close(F);
end.