Pascal/Turbo Pascal - LEER E IMPRIMIR ARCHIVOS

Tengo un problema qeu no puedo solucionar y es el siguiente...
tengo un archivo (arch) con 4 campos:rarch.cod, rarch.pu, rarch.cant, rarch. mov......
los cargo haciendo un read(rarch.cod, rarch.pu, rarch.cant, rarch. mov);
y despoues write(arch, rarch);
(aunke tambien probe con readln y con un read para cada uno....)
y cuando los imprimo(en pantalla) los imprimo con un while not eof (arch) do begin
read(arch, rarch);
writeln( rarch.cod, rarch.pu, rarch.cant, rarch. mov)
y no me los imprime o al menos me imprime numeros completamente locos......... osea algunos qeu yo puse y otros nose inventados tipo basura nose.....
osea todos los tipos y las var estan bien aparte teno en un mismo programa 2 o 3 archivos qeu cargo y uome lo carga e imprime bien y el otro no eso es lo que me llama la atencion

bueno si alguin me da una mano me ayudaria mucho
gracias

Cuando grabes los campos, utiliza el WriteLn. Para leerlos, usa el ReadLn.

Así no deberías tener problemas. Saludos ;-)

Me dí cuenta de un detalle:
Estás leyendo el archivo así: Read(Campo1, CAmpo2,...)
y no así: ReadLn(Arch, Campo1, Campo2,...)

Por ahí parece que va el problema. Saludos ;-)