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 |
Hola.
Cita:
Normal que te casque el error :confused: En vez de Rewrite(Fichero), usa Reset(Fichero) si quieres imprimir directamente o cambia el nombre al fichero. Cita:
|
Ya me funciona, era porque en las propiedades de la impresora que esta en red le he tenido que poner que el lpt1 de mi ordenador es la impresora de red, me he dado cuenta cuando me he llevado el programa al ordenador que tenia la impresora conectada directamente al puerto lpt1
|
¿?
¿funciona en windows 2000? :confused:
|
La franja horaria es GMT +2. Ahora son las 13:51:40. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi