OpenEuphoria

Re: exw.exe (when 4..0.0) and Win32lib

• Posted by Wolf <wolfritz at KING.IGS.NET> Jan 30, 2003
• 402 views

> Now I remember why I used exw.exe as 3.1 for so long; exw.exe as 4.0 and 
> Win32lib will not allow printing from my exw program. 

Here's a <snipped> fix out of getPrintChoice(), that works on my simple
'prints'.
This prints *everything*,
however you can still select the printer, and it's properties.
... amused by the fact that pMaxPages seems to be 0 based   
Wolf

<snip>
mem=acquire_mem(0,SIZEOF_PRINTDLG)
store(mem,PRINTDLG_lStructSize,SIZEOF_PRINTDLG)
--store(mem,PRINTDLG_nMinPage,1) --always killed dialog!
else
mem=pPrintDlg
end if
if sequence(pFlags)then
flags=or_all(pFlags)
else
flags=or_all({pFlags,PD_PAGENUMS,PD_RETURNDC})
end if
store(mem,PRINTDLG_flags,flags)
--** added this
store(mem,PRINTDLG_nCopies,1)
-- this is irrelevent anyways, unless you know the number of pages ahead?
--store(mem,PRINTDLG_nMaxPage,pMaxPages)
releasePrinter()
<end-snip>