Hi,

Since changing to Vista we have a problem saving the printerenvironment. The
sys(1037,1) button doesn't have the "printer" button anymore, so you need to
call the Getprinter() first. I changed my code like this :

use myreport.frx
sys(1037,2) && Restore old printer info

lcPrinterOld = SET("PRINTER",2)
lcPrinter = Getprinter()

if NOT lcPrinter = lcPrinterOld
SET PRINTER TO NAME (lcPrinter)
SYS(1037) && Call the page setup

SYS(1037,3) && Save current printer settings
endif

When I try this, it just restores my report settings to the default
settings. Also the helppage on this subject is very confusing.

Thanks for any help
Greetings
Xavier