Átírni (eljárás) - site "Mindent a pascal"
Eljárás átírni (var F. Fájl [; Recsize Szó.]);
A Windows, Valódi, Védett
Paraméter F - változó bármilyen fájltípus társítva egy külső fájlból a hozzárendelése. RecSize - választható paraméter, amely meghatározza a méret a blokk kell használni az adatátvitelhez. Ha RecSize elhagyható, kapott egy alapértelmezett blokk mérete 128 bájt.
Átírni eljárás létrehoz egy új külső fájl nevét rendelt változó F. Ha a külső fájl ugyanazzal a névvel már létezik, akkor el kell távolítani, és egy új üres fájlt hoz létre a helyén. Ha F már nyitva van, akkor bezár majd újra létre. Az aktuális pozíció mutató értéke elején egy üres fájlt.
Ha az F változó van rendelve egy üres név, pl hozzárendelése (F, „”), akkor a hívás után újraírni, F változó fogja alkalmazni a szabványos kimeneti fájl (egy szabványos leíró szám = 1).
Ha az F - egy szöveges fájl, akkor F kinyitják csak írásra. A hívás után, hogy átírják, EOF értéket (F) egyenlő True.
A mód IOResult függvény értéke 0, ha a művelet sikeres volt, egyébként vissza nem nulla hibakódot.
kezdődik
Hozzárendelése (F 'újfájl $$$.'.);
Átírni (F);
WriteLn (F. „újonnan létrehozott fájl a szöveg benne.”);
Bezárása (F);
végén.
Kódot :. . . GOST.
Házigazdája „Web Service Center” támogatásával „DokLab”