Βασικός χειρισμός
- Ο χειρισμός των αρχείων στην Pascal γίνεται μέσω μιας
μεταβλητής τύπου
FILE OF ...
- Πριν θελήσουμε να διαβάσουμε ή να γράψουμε ένα αρχείο πρέπει
να συνδέσουμε τη μεταβλητή χειρισμού του αρχείου (π.χ. FileVar) με το
όνομα του αρχείου που θα χρησιμοποιήσει το λειτουργικό σύστημα.
Η σύνδεση αυτή γίνεται με την εντολή
assign(FileVar, FileName)
- Πριν γράψουμε στο αρχείο
πρέπει να καλέσουμε την εντολή
rewrite(FileVar)
ενώ πριν διαβάσουμε από το αρχείο
πρέπει να καλέσουμε την εντολή reset(FileVar)
.
- Από το αρχείο διαβάζουμε και γράφουμε με τη χρήση των
εντολών
read(FileVar, Var ...)
και
write(FileVar, Var ...)
.
- Οι εντολές αυτές μεταφέρουν τα δεδομένα μεταξύ της μεταβλητής
και του αρχείου σύμφωνα με την παράσταση των δεδομένων στην
εσωτερική μνήμη του υπολογιστή.
- Κατά την ανάγνωση του αρχείου μπορούμε να ελέγξουμε αν το αρχείο
περιέχει και άλλα στοιχεία με τη συνάρτηση
EOF(FileVar)
(End of File).
- Τέλος, όταν τελειώσουμε τη χρήση του αρχείου καλούμε την εντολή
close(FileVar)
για να σταματήσει ο συσχετισμός της
μεταβλητής χειρισμού του αρχείου με το αρχείο του λειτουργικού
συστήματος.
Παράδειγμα:
program testfile;
var
f : file of integer;
i : integer;
begin
assign(f, 'INT.DAT');
rewrite(f);
for i := 1 to 5 do
write(f, i);
close(f);
reset(f);
while not eof(f) do
begin
read(f, i);
writeln(i)
end;
close(f);
end.
Μετά την εκτέλεση του παραπάνω προγράμματος
το αρχείο INT.DAT θα περιέχει τις παρακάτω τιμές:
01 00 02 00 03 00 04 00 05 00