|
Problema con TextFile
Hola tengo un problema con el siguiente codigo:
procedure....
var
Fichero:TextFile;
Begin
AssignFile(Fichero,'LPT1');
Rewrite(Fichero);
For i:=1 To...
....
end;
El caso es que cuando llega a la linea de Rewrite(Fichero). me casca un error que me dice que ElnOutError with message 'Invalid Filename' porque no me coge el nombre del archivo si lo he hecho igual que en otro programa que si funciona
|