Thanks to Dion Duran, Bill Wemple and any others who pursued my problem of
the bug with the new Set Window Printer statement.
As Bill pointed out it is necessary to use a command string to get this
statement to work. I found that the entire statement needs to be run as an
alias command for it to work successfully in a variety of cases. The
statement seemed to have a problem recognising the Printer Name sometimes if
it was included in the Set Window statement. My example is shown below:
Sub donext
CLS
FW = FrontWindow()
prnta = """\\NT1\LPS17_PS_1"""
prntb = """\\NT1\HP1055CM by HP"""
pprA4p = "PaperSize 9" 'A4
pprA3p = "PaperSize 269" 'A3 portrait
pprA2p = "PaperSize 270" 'A2 portrait
pprA1p = "PaperSize 271" 'A1 portrait
pprA0p = "PaperSize 272" 'A0 portrait
If CommandInfo(CMD_INFO_MENUITEM) = 5000 THEN 'A4
portrait
>>> sCmd = "Set Window " + FW + " Printer Name " + prnta + " Orientation
Portrait Copies 1 " + pprA4p
>>> Run Command sCmd
Alter MapInfoDialog 1742 Control 1056 Value 1
Run Menu Command 111
.......................... etc
Doug Pease
GISO
Livingstone Shire council
P.O. Box 600
YEPPOON 4703
Ph 49399957
----------------------------------------------------------------------
To unsubscribe from this list, send e-mail to [EMAIL PROTECTED] and put
"unsubscribe MAPINFO-L" in the message body, or contact [EMAIL PROTECTED]
