Rescrie (procedura) - site-ul "totul despre pascal"

Procedură Rewrite (var F. Fișier [; Recsize Word]);

Windows, real, protejat

Parametrul F este o variabilă a oricărui tip de fișier asociat unui fișier extern, utilizând Atribuiți. RecSize este un parametru opțional care determină dimensiunea blocului pe care doriți să îl utilizați atunci când transferați date. Dacă este omisă RecSize, este acceptată dimensiunea implicită a blocului de 128 de octeți.







Procedura ReWrite creează un nou fișier extern cu numele atribuit variabilei F. Dacă un fișier extern cu același nume există deja, acesta este șters și un nou fișier gol este creat în locul său. Dacă F este deja deschis, acesta este mai întâi închis și apoi re-creat. Poziția cursorului curent este setată la începutul fișierului gol.







Dacă F este atribuit un nume gol, de exemplu Assign (F, ''), după accesarea ReWrite, variabila F se va referi la fișierul de ieșire standard (standard descriptor number = 1).

Dacă F este un fișier text, atunci F se deschide doar pentru scriere. După accesarea ReWrite, valoarea Eof (F) este True.

În modul, funcția IOResult returnează 0 dacă operația a avut succes, altfel returnă un cod de eroare diferit de zero.

începe
Alocați (F. "NEWFILE. $$$");
Rewrite (F);
WriteLn (F. "Fișierul nou creat cu acest text înăuntru.");
Închidere (F);
end.

Introdu cod :. . . GOST.

Gazduire oferită de compania "Web Service Center" cu sprijinul companiei "DokLab"







Articole similare

Trimiteți-le prietenilor: