SetUp Printer at runtime

[RobertoMexicali]

Is anybody knows how can i recover the original setup printer after i change it?

i'm doing this:

the default printer is N printer, my user has to print a document in laser quality so i change it and start my report procedure:

PRINTERDIALOG('Choose Printer')
PrintConstancias2004(CONS:NUMDOCTO,CONS:FECHA_IMPRE)

what i need is that when i get back from the report, the user can change back to the default printer without the printer dialog

thanks

 

[vpos]

Hi,

Have you tried to use Printer{PROPPRintevice} to read or set the printer?

OldPrinter String(50)
OldPrinter = Printer{PROPPRintevice}
PRINTERDIALOG('Choose Printer')
PrintConstancias2004(CONS:NUMDOCTO,CONS:FECHA_IMPRE)
Printer{PROPPRintevice} = OldPrinter

You will need to add INCLUDE('PRNPROP.CLW') to the project in the global includes

Valery.

 

[RobertoMexicali]

Thanks Valery your help was very usefull, i used your tip and is working perfectly