Ver Mensaje Individual
  #5  
Antiguo 25-05-2007
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
Reputación: 24
seoane Va por buen camino
Vamos por partes. Primero declaramos un tipo:
Código Delphi [-]
type
  TRegistro = record
    Nombre: String[32];
    Telefono: String[16];
  end;
Fíjate que los strings tienen una longitud limitada, no puedes usar String sin especificar su longitud. Seguramente el error que tienes sea debido a eso.

Luego a la hora de utilizarlo:
Código Delphi [-]
var
  Registro: TRegistro;
  Archivo: File of TRegistro;
begin
  AssignFile(Archivo,'C:\archivo.bin');
  Rewrtie(Archivo);
  Registro.Nombre:= 'Pepe';
  Write(Archivo,Registro);
  CloseFile(Archivo);
end;
Responder Con Cita