Ver Mensaje Individual
  #7  
Antiguo 07-02-2007
Avatar de ixMike
ixMike ixMike is offline
Miembro
 
Registrado: feb 2004
Posts: 1.151
Reputación: 24
ixMike Va por buen camino
Hey!!!!!!!!!!!!!

Os habéis dejado algo: crear tu propio tipo de archivo.

Funciona a modo de registros.

Primero creas tu tipo de dato (si es necesario) o utilizar uno ya existente (según necesites). Por ejemplo:

Código Delphi [-]
type
  TTipoDato = record
    Nombre: string[20]; //en tipo cadena siempre tienes que indicar el tamaño
    Apellidos: string[50];
    Edad: byte;
    Altura: double;
  end;

Puedes usar cualquier tipo, excepto objetos.

Después tienes que declarar una variable para manejar el dato y otra para el archivo:

Código Delphi [-]
var
  Archivo: File of TTipoDato;
  Datos: TTipoDato;

Ya por último tienes una serie de procedimientos para manejar los archivos. Para conocerlos bien te recomiendo que mires la ayuda de Delphi:

AssignFile: Asigna un archivo a una variable.
Reset: Abre el archivo y te posiciona en el último registro
Rewrite: Abre el archivo y te posiciona en el primer registro
Seek: Te posiciona en el registro n del archivo abierto.
EOF: devuelve true si estás al final del archivo.
CloseFile: cierra el archivo
Read: asigna a una variable el valor de un registro
Write: escribe en un registro en valor de una variable
FileSize: devuelve el tamaño de archivo (en cantidad de registros).


Espero que te sea de ayuda

Salu2 a todo el club
Responder Con Cita