Abrir, leer y escribir un archivo de texto

[zvf]

Ahi les va, el codigo de Bicho me manda un error al correrlo, me dice

Project Project1.exe raised exception class EInOutError with message I/O error 6

Esta excepcion la manda en la linea:

Código Delphi [-]
while not Eof do begin

Ahh, otra cosa la linea:

Código Delphi [-]
AssignFile('c:\test.txt', f);

No compila y la cambie por:

Código Delphi [-]
AssignFile(f,'c:\test.txt');

Y ya esta, solo que manda ese error a la hora de correrlo


Y el de seaone, la primera vez se ejecuto bien, pero despues se cicla.


SABEN PORQUE PUEDA SER??

GRACIAS