Los siguientes procedimientos y funciones estan predefinidos en Turbo Pascal 7 y nos seran de mucha ayuda, en pocas palabras son imprescindibles para el manejo de archivos. Se omite la explicacion de algunos parametros pues me imagino que ya estaran mas que claros.
| Funcion o Procedimiento | Descripcion |
|---|---|
| FileSize ( archivo ) : longint |
Devuelve el tama�o actual del archivo, esta funcion devuelve un entero largo, se usa sola en archivos binarios y en archivos sin tipo, prohibidisimo usarlo en archivos de texto (pues marcara error en tiempo de compilacion), en los archivo sin tipo devuelve el tama�o de los archivos en bytes, cuando es usado en archivos binarios devuelve el numero de registros. En archivos binarios, devuelve... como diriamos, el numero real de registros, ya saben que el primer registro es el numero 0, de tal forma que si un archivo tiene 10 registro, se accede al numero 10 en la posicion 9, pues bien, FileSize devuelve el numero 10 y no 9. Si el archivo esta vacio devuelve 0 |
| FilePos ( archivo ) : longint |
Devuelve la posicion actual del puntero dentro del archivo, esta funcion devuelve un entero largo, solo para archivos binarios y sin tipo. Esta funcion al contrario de FileSize si devuelve la posicion real del puntero en el archivo, si el puntero esta en el registro 5 de 10 que tenga un archivo FilePos devolvera 4, si el archivo esta vacio FilePos devuelve 0 |
| Seek ( archivo , Posicion ) |
Seek es un procedimiento muy util. Mueve el puntero del archivo a una posicion especifica, Posicion es un entero largo Hay que tener cuidado al usar este procedimiento, ya que si por error intentamos posicionarnos mas alla del tama�o del archivo, tendremos un error en tiempo de ejecucion Disk Read Error, por ejemplo si tenemos 10 registro en un archivo no podemos hacer esto seek(archivo,10); esto esta mal porque queremos acceder a la posicion 10 que no existe, en cambio seek(archivo,9) es correcto porque el registro 10 esta en la posicion 9 |
| EOF ( archivo ) : boolean |
EOF es una funcion que devuelve verdadero cuando el puntero del archivo esta al final de un archivo EOF significa End Of File (Fin de Archivo). Es una funcion muy util cuando se hacen busquedas lineales en un archivo y suele usarse con un while ( while not eof ( archivo ) ) |