Manejo de archivos binarios en Delphi

[rodrigo19]

Hola a todos, soy nuevo en el foro y apenas estoy aprendiendo a programar en delphi, necesito guardar registros en un archivo, si tienen alguna informacion que me pueda ayuddar se los agradeceria. Gracias

[axesys]

Puedes checar aqui
http://www.delphibasics.co.uk/ByFunction.asp?Main=Files

[[seoane]]

Supongo que con registro te refieres algo como esto:

Código Delphi [-]
TRegistro = record
  Nombre: String[32];
  Telefono: String[16];
end;

Pues si es así tienes, al menos, 3 posibilidades, los archivos sin tipo, los archivos con tipo y los stream.

Los archivos sin tipo se declaran de la siguiente manera:

Código Delphi [-]
var
  F: File;

y se maneja con las funciones AssingFile, Reset, Rewrite, CloseFile, BlockRead y BlockWrite entre otras ...

Loas archivos con tipo se declaran así:

Código Delphi [-]
var
  F: File of TRegistro

y se maneja con las funciones AssingFile, Reset, Rewrite, CloseFile, Read y Write entre otras ...

Y luego te quedan los stream, una clase de delphi que permite leer y escribir información de una forma muy sencilla. En concreto deberías mirar la clase TFileStream.

Bueno, como ves hay muchas posibilidades, elige la que mas te guste y si tienes dudas pregunta

[rodrigo19]

Gracias por la informacion dada se los agradesco mucho, con esta informacion ya pude crear un registro.

Pero porque al crear el archivo de tipo registro me da un error.
Lo declaro de la siguiente manera:

Código Delphi [-]
var
                 archivo: Tregistro;

el error que da es el siguiente:
Error, nesecita darle finalizacion al tipo Tregistro- tipo no permitido.

De antemano Muchas gracias.

[[seoane]]

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;

[[Delphius]]

Hace un buen tiempo estaba haciendo unas simples prácticas de archivos.

Aqui te paso la "agendita" que me hice. Creo que puede serte útil para aprender a manejar archivos.

Saludos,

[rodrigo19]

Gracias a todos lo que me ayudaron!!