Lucrul cu fisiere

Toate programele facute pana acum acceptau, ca sursa de date, tastatura, iar ca iesire, monitorul. Cu toate acestea, Pascal permite folosirea fisierelor.

Sunt convins ca v-ati intrebat, cel putin o data, de ce jocurile se instaleaza cu o multime de fisiere aditionale, in afara de executabilul propriu-zis. Raspunsul e simplu: resursele respectivului joc se afla in acele fisiere (harti, imagini, sunete, etc). Executabilul jocului citeste si scrie acele fisiere in functie de necesitati (scrie, de exemplu, in fisierul de high-scores).

Sa vedem cum putem folosi si noi fisiere, in Pascal.

Pentru inceput trebuie sa stiti ca Pascal ofera trei tipuri de fisiere:

• fisiere text
• fisiere cu tip
• fisiere fara tip

Modul de lucru (accesare, citire, scriere) difera, cel putin partial, la fiecare tip de fisier.

Sa incepem cu inceputul.

Fisiere text in Pascal (text files)

Sa presupunem ca vrem sa citim doua numere de pe prima linie a unui fisier text, si apoi matricea cu respectivul numar de linii si coloane, dintr-un fisier text (creat cu notepad sau orice alternativa a acestuia). Fisierul ar putea avea urmatorul continut:


Sa vedem un program care citeste acest fisier si afiseaza datele citite pe monitor.

Declaratia unui fisier text se face identic cu declararea unei variabile obisnuite, iar tipul variabilei este Text. Fisier Text . Restul variabilelor nu are rost sa le explic, le puteti intelege daca ati parcurs tutorialele precedente.

Sa vedem ce proceduri si functii avem la dispozitie pentru lucrul cu fisiere text.

Daca ati trecut prin explicatiile date in tabelul de mai sus, ar trebui sa stiti destul de multe pentru a folosi un fisier text fara probleme.

Sa vedem un mic program care citeste prima linie dintr-un fisier text si o adauga, inversata, la sfarsitul fisierului.
Ultimul program care va folosi fisiere text in acest tutorial va citi date dintr-un fisier si le va salva in alt fisier.
Atentie: presupun ca este evident ca toate fisierele de intrare folosite in aceste programe vor trebui create manual inainte de pornirea programului.

Fisiere cu tip in Pascal (typed files)

Acum, dupa ce-ati aflat ce-i cu fisierele text in Pascal, o sa-mi spuneti ca jocurile pe care le mentionam mai sus nu folosesc fisiere text, sau foarte rar... si nu va pot contrazice. Asa este.

Fisierele text, desi permit salvarea a orice date in ele, sunt limitate de faptul ca nu ne permit citirea unui anumit caracter, decat daca am citit toate caracterele dinaintea lui. Imaginati-va un fisier text de cativa megabytes (mega-octeti, daca vreti ), din care vrem sa citim caracterul cu indicele 1.123.194 ... va trebui sa citim un milion de caractere inainte de a putea citi caracterul care ne intereseaza.

Aici intra in joc fisierele cu tip. Ele permit citirea secventiala a datelor (ca si fisierele text), dar si citirea aleatorie (random) din fisier. Spre deosebire de fisierele text, de unde puteam citi doar siruri de caractere (nu va lasati pacaliti de faptul ca ReadLn citeste si numere ... le converteste intern din string in valoare numerica !), din fisiere fara tip se pot citi doar valori de acelasi tip ca si fisierul in sine.

Fisierele cu tip sunt, practic, o varianta a vectorilor (array, if you please). Pot stoca date de un singur tip, cel setat in declararea variabilei de fisier, dar sunt limitate de spatiul disponibil pe hard-disk (si, in versiunile vechi de Pascal, cum ar fi Borland Pascal, de o marime maxima de 2 GB / fisier - tineti totusi cont ca in 1992, cand a aparut Borland Pascal 7.0 nu sunt sigur daca existau, inca, hard-disk-uri atat de mari !).

Haideti sa vedem un mic program care scrie un set de date aleatorii intr-un fisier cu tip (tip integer, pentru inceput), iar apoi le reciteste si afiseaza a 20-a valoare din fisier.
Este de remarcat faptul ca fiecare element din fisier ocupa 2 bytes, in acest caz (integer).

Lista de proceduri si functii care pot fi folosite la manipularea fisierelor cu tip sunt date in tabelul de mai jos. Explicatiile date in acest tabel sunt doar complementare celor date in tabelul de proceduri si functii dat pentru folosirea cu fisiere text.

Niciodata nu mi-a placut restrictia care spunea ca aceasta procedura / functie nu poate fi folosita cu fisiere text, asa ca am cautat o solutie. Solutia evidenta este sa folositi un fisier cu componente de tip Char (practic, text), putand astfel folosi si functii gen FileSize, FilePos, Seek, Truncate. Totusi, probabil ca ati vrea sa aveti grija la sfarsiturile de linie / fisier

Fisiere fara tip in Pascal (untyped files)

Fisierele fara tip pot fi privite ca niste fisier cu tip byte, cu diferenta ca datele din aceste fisiere nu pot fi citite/scrise cu procedurile obisnuite (Read, Write), folosind BlockRead/BlockWrite, pentru transferuri la viteza mare.

Sa vedem ce s-a modificat si ce s-a adaugat, din punct de vedere al instructiunilor care pot fi folosite.


In continuare, un exemplu de program care copiaza un fisier (fara niciun fel de verificari).
Daca fisierul care se doreste copiat nu exista, sau daca fisierul destinatie nu are extensie (lol ) sau intervine orice alta problema, programul va returna erori. Nu este dat decat pentru a exemplifica un mod de lucru cu fisierele fara tip.