I have an app that prints on Mac as expected without any hitches but on PC I
get a tiny output in the top left hand corner.
This is what I have in Printersetup
Dim ok as Boolean
Dim ps as printersetup
ps = new printersetup
' ps.maxverticalResolution = -1
' ps.maxhorizontalResolution = -1
ok = ps.pagesetupdialog
if ok then
self.ps = ps 'store in property
' else
' self.ps = new printersetup
end
return ok
With Mac I had a similar problem, I had to use a magnification factor,
(500%), so I commented-out
ps.maxverticalResolution = -1
ps.maxhorizontalResolution = -1
as shown above and that solved that problem.
Any suggestions.
Thanks.
Lennox.
_________________________________________________________________
Express yourself instantly with MSN Messenger! Download today it's FREE!
http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://www.realsoftware.com/listarchives/lists.html>
|