Problemas con archivo tipo TXT

[CamiloU]

Muchas Gracias Lepe por la colaboración pero te comento que el archivo me genero igual.

Como inserto el cambio de lìnea, cual instruccion debo utilizar para que cada registro inicie linea y pueda obtener registros de longitud 487.

Muchas Gracias.

[jachguate]

El problema es que estas usando archivos binarios y tratando de producir un archivo de texto.

Código Delphi [-]
var
  Form1 : TForm1;
  R01 : TextFile; //file of Registro01;
  R02 : TextFile; //file of Registro02;

Esto, porque writeln solamente tiene sentido en archivos de texto.

El "montaje" de los nombres ocurre porque, al grabar un archivo binario, (file of record) almacenará tantos caracteres como tenga reservados el registro para la cadena del nombre y del apellido, y evidentemente estos espacios no están resultando suficientes.

Hasta luego.