Además
de archivos de texto, Pascal cuenta con archivos con tipo, que se caracterizan
porque los datos son almacenados en disco de la misma manera que se almacenan en
memoria. Son archivos de acceso directo, por lo que para acceder a un registro
noes necesario recorrer previamente todos los anteriores.
Los
archivos de acceso directo no se escriben campo a campo, sino registro a
registro.
En
esta tipo de archivos no se pueden emplear WriteLn ni ReadLn, porque los dato no
están en líneas en el fichero.
Declaración
de tipos :
Type
Reg=RECORD
c1 :tipo1 ;
c2 :tipo2 ;
.
.
.
End ;
Arch
= file of Reg ;
Declaración
de variables :
Var
f : Arch ;
r :Reg ;
Apertura
de archivo :
·
1ª
vez à
Rewrite (f) ; {crea archivo} L/E
·
Si
ya existe à
Reset (f) ; L/E
Para
escribir en un archivo directo :
Write (f, r) ; { No se escribe campo a campo, sino registro a
registro}
{NO
se puede emplear WriteLn porque los datos no están en líneas en el fichero.}
Para
leer desde un archivo de texto :
Read (f, r) ; { se lee
un registro completo, no campo a campo}
{NO se puede emplear ReadLn porque no hay
señal de fda.}
Después
de ejecutarse un Write o un Read, el puntero avanza al siguiente registro (tanto
en secuencial como en acceso directo). En Pascal los regist