Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Manejo de archivos binarios en Delphi (https://www.clubdelphi.com/foros/showthread.php?t=44000)

rodrigo19 25-05-2007 20:12:32

Manejo de archivos binarios en Delphi
 
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 25-05-2007 20:22:19

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

seoane 25-05-2007 20:23:57

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 25-05-2007 20:39:27

Manejo de archivos binarios
 
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 25-05-2007 21:10:17

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 25-05-2007 21:59:36

1 Archivos Adjunto(s)
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 26-05-2007 02:36:52

Muchas Gracias
 
Gracias a todos lo que me ayudaron!!:)


La franja horaria es GMT +2. Ahora son las 23:17:40.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi