PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2024 → printing problems
printing problems
Débuté par Jorge Montesinos, 28 sep. 2005 12:48 - 1 réponse
Posté le 28 septembre 2005 - 12:48
I would like to check if a directory contents some files, in afirmative case I would like to send this file to print, I try to do it with this code:

resul is string
Nuevo is int

Nuevo = fOpen("C:\jorge\programa para mandar imir\My_Project\epson\enviado.txt", foRead)
IF Nuevo <> -1 THEN
resul = fRead(Nuevo ,1000)
iPreview(100)
iPrintWord(resul)

END

Windew shows the content of the file enviado.txt, but when I press the button Print, the printer prints a blank page
Posté le 30 septembre 2005 - 15:01
iPrintWord does'nt activate the printer.
you need additionally iEndPrinting()


resul is string
Nuevo is int

Nuevo = fOpen("C:\jorge\programa para mandar imir\My_Project\epson\enviado.txt", foRead)
IF Nuevo <> -1 THEN
resul = fRead(Nuevo ,1000)
iPreview(100)
iPrintWord(resul)

iEndPrinting()

END