Buenas nuevamente, tengo un problema, pero no es en delphi es en pascal, creo que el tema va acá y por ahí alguien me puede ayudar.
El tema es el siguiente.. tengo un archivo de tipo record y tengo que convertirlo a un archivo de texto, un .txt lo que hice copila y todo pero cuando llego a la linea append(arch1); el programa se interrumpe, el código es el siguiente...
Código Delphi
[-]
procedure Listarpersonas (var arch:archivo;var arch1:archivo2);
var
p : personas;
begin
reset (arch);
assign(arch1,'personas.txt');
append(arch1);
while not (eof(arch)) do
begin
read(arch,p);
writeln(arch1,p.nom,' ',p.ape,' ',p.nac);
end;
end;
arch es el archivo que contiene registros
arch1 es el archivo de texto.
Gracias de antemano .