Proceduri de lucru și cu funcția de fișiere

Procedura AssignFile (var F; FileName: String);

Pentru a evita conflictele, AssignFile Alocați înlocuiește procedura standard de la Delphi. Cu toate acestea, pentru compatibilitate inversă, puteți utiliza Atribuire. Procedura AssignFile compară numele unui fișier extern cu o variabilă fișier.

F - variabilă fișier de orice tip de fișier, NumeFișier - expresie String sau expresie tip PChar dacă este permisă sintaxa extinsă. Toate operațiunile ulterioare cu F a produs cu un fișier extern.

Nu utilizați AssignFile variabilă fișier deja deschis.

Procedura CloseFile (var F);

Din cauza conflictelor de nume, procedura CloseFile înlocuiește procedura Închide standard a Borland Pascal. Utilizați CloseFile pentru a rupe legătura dintre o variabilă fișier și un fișier de pe disc extern și închideți fișierul.

F - variabilă fișier de orice tip de fișier, proceduri deschise Reset, reinscripționați sau Append. Fișierul extern asociat cu F, modificat complet și apoi închis, eliberând descriptorul de fișier pentru reutilizare.

Directiva vă permite să se ocupe de erori în timpul rulării folosind o manipulare excepție.

Atunci când off, directiva, ar trebui să utilizați IOResult la erori de validare de intrare - ieșire.

Funcția EOF (var F): Boolean;

(Dactilografiate sau fișiere fără tip)

Funcția EOF [(var F: Text)]: Boolean;

Verifică dacă este sau nu poziția de fișier curent este sfârșitul fișierului.

EOF (F) returnează true, dacă poziția curentă a fișierului este ultimul simbol al fișierului sau dacă fișierul este gol; în caz contrar, EOF (F) returnează false.

Directiva vă permite să se ocupe de erori în timpul rulării folosind o manipulare excepție.

Atunci când off, directiva, ar trebui să utilizați IOResult la erori de validare de intrare - ieșire.

Procedura Erase (var F);

Elimină fișierul extern asociat cu F.

F - variabilă fișier de orice tip de fișier.

ERASE înainte de a apela procedura, trebuie să închideți fișierul.

Directiva vă permite să se ocupe de erori în timpul rulării folosind o manipulare excepție.

Atunci când off, directiva, ar trebui să utilizați IOResult la erori de validare de intrare - ieșire.

Function filesize (var F): Integer;

Se întoarce dimensiunea în octeți a fișierului F. Cu toate acestea, în cazul în care F - fișier de tastat, FILESIZE returnează numărul de înregistrări într-un fișier.

Înainte de a utiliza funcția FILESIZE, fișierul trebuie să fie deschis.

Dacă fișierul este gol, FILESIZE (F) returnează 0.

F - variabila de orice tip de fișier.

FilePos Function (var F): LongInt;

Returnează poziția curentă a fișierului în cadrul fișierului.

Înainte de a utiliza funcția FilePos, fișierul trebuie să fie deschis. Funcția FilePos nu este utilizat cu fișiere text.

F - variabila de orice tip de fișier, cu excepția tipului de text.

Procedura de resetare (var F [: File; RecSize: Word]);

Deschide un fișier existent.

F - variabila de orice tip de fișier asociat cu un fișier extern folosind AssignFile. RecSize - expresie opțională, care este utilizat în cazul în care F - fișierul netipizat. Dacă F - fișier netipizat, RecSize determină mărimea înregistrării, care este utilizat pentru transmisia de date. RecSize Dacă omis, dimensiunea de înregistrare implicită este de 128 de octeți.

Reset Procedura se deschide un fișier extern existent, asociat cu variabila de fișier F. Dacă fișierul extern cu același nume nu este prezent, apare eroare de run-time. Dacă fișierul asociat cu F este deja deschis, este mai întâi închis și apoi redeschis. Poziția de fișier curent este setat la începutul fișierului.

Procedura de rescriere (var F: File [; Recsize: Word]);

Creează și deschide un nou fișier.

F - variabila de orice tip de fișier asociat cu un fișier extern folosind AssignFile.RecSize - expresie opțională, care este utilizat în cazul F - fișierul netipizat. Dacă F - fișier netipizat-TION, RecSize determină mărimea înregistrării, care este folosit pentru a ne-săpun de date. Dacă RecSize omis, dimensiunea implicită a Vo ice-B este de 128 de octeți.

Procedura de rescriere creează un nou fișier extern cu numele asociat cu F.

Dacă există deja fișierul extern cu același nume, acesta este îndepărtat, și un nou fișier gol.

Procedura Seek (var F; N: LongInt);

Mută ​​poziția fișierului curent la o anumită componentă. Puteți utiliza această procedură numai pentru a deschide fișierul dactilografiat sau netipizat.

Poziția F fișier curent se mută la numărul N. Numărul primului fișier al componentei - 0.

Seek Declarația (F, FILESIZE (F)) se deplasează în poziția curentă în fișier sfârșitul fișierului.

Procedura Append (var F: Text);

Deschide un fișier text existent pentru a adăuga informații la fișierul (adăugare).

Dacă fișierul extern cu numele dat nu există, există o eroare de run-time.

F Dacă fișierul este deja deschis, acesta este închis și redeschis. Poziția de fișier curent este setat la sfârșitul fișierului.

Funcția Eoln [(var F: Text)]: Boolean;

Verifică dacă poziția de fișier curent este sfârșitul liniei de fișier text.

Eoln (F) se întoarce Adevărat, în cazul în care poziția de fișier curent - la sfârșitul unui șir de caractere sau un fișier; în caz contrar Eoln (F) returnează false.

Procedura de citire (F, V1 [, V2 Vn.]);

(Tastată și fișiere fără tip)

Procedura de citire ([var F: Text;] V1 [., V2 Vn]);

Pentru fișiere dactilografiate procedură citește un fișier componentă într-o variabilă. La fiecare citire a poziției curente se mută la următorul element din dosar.

una sau mai multe valori în una sau mai multe variabile pentru a citi fișiere text.

O variabilă de tip șir Citește citește toate caracterele până la următoarea sfârșitul tag-ul liniei (dar fără a include), sau până când EOF funcția (F) nu acceptă Adevărat. Variabila este atribuit șirul de caractere rezultat re-rezultat.

În cazul unei variabile de tip întreg sau procedură reală așteaptă o secvență de caractere care alcătuiesc numărul de reguli de sintaxă obiectului limbajului Pascal. Citirea se oprește după detectarea primului spațiu, un caracter tab, sau marca sfârșitul liniei, sau în cazul în care funcția EOF (F) are valoarea reală. În cazul în care linia Chi-cuvânt nu se potrivește cu formatul de așteptat, o eroare de intrare sau de ieșire.

Procedura readln ([var F: Text;] V1 [., V2 Vn]);

Citește este o extensie a procedurii și este definit pentru fișierele text. Citește un șir de caractere într-un fișier (inclusiv marcatorul final linia), și trece la linia următoare. Funcția de apel readln (F), fără a se deplasează pas parametrii poziția fișierului curent la începutul suflare urmează-line, în cazul în care este disponibil, în caz contrar continuă să se încheie de fișier.

Funcția SeekEof [(var F: Text)]: Boolean;

Se întoarce semnul sfârșitul fișierului și poate fi folosit doar pentru a deschide un fișier text. De obicei utilizate pentru citirea valorilor numerice din fișiere text.

SeekEoln Funcția [(var F: Text)]: Boolean;

Returnează semnul sfârșitul liniei în fișierul și poate fi folosit doar pentru a deschide un fișier text. De obicei utilizate pentru citirea valorilor numerice din fișiere text.

Procedura Write ([var F: Text;] P1 [., P2 Pn]);

Scrie unul sau mai multe valori într-un fișier text.

Fiecare parametru de înregistrare trebuie să aibă un tip de Char, unul dintre tipurile intregi (Byte, ShortInt, Word, LongInt, Cardinalul), un tip de virgulă mobilă (Single, Real, Double, Extended, valuta), una de tip string (PChar, AnsiString , ShortString), sau unul dintre tipurile de logice (boolean, Bool).

Procedura Write (F, V1 Vn.);

Scrie o variabilă la componenta de fișier. Variabilele V1. Vn trebuie să fie de același tip ca și elementele dosarului. Atunci când fiecare poziție de curent variabilă de înregistrare în fișierul este mutat la elementul următor.

Procedura WriteLn ([var F: Text;] P1 [., P2 Pn]);

Execută operația de scriere, apoi plasează la sfârșitul mărcii linie din fișier.

Apel writeln (F) fără a parametrilor înregistrați într-o linie de marcaj final fișier.

Fișierul trebuie să fie deschis pentru ieșire.

articole similare