the following code, basically taken from the docs, always prints one only copy, even if in the OpenPrinterDialog I specify more than one copy.
Dim g As Graphics
Dim p As PrinterSetup
p = New PrinterSetup
If p.PageSetupDialog Then
g = OpenPrinterDialog§
If g <> Nil Then
for i as Integer = 0 to g.Copies//2, 3, 4 etc
g.DrawString(“Hello World”, 50, 50)
next
End If
End If
I was under the impression that the OS took care of g.nextpage
[code]Dim g As Graphics
Dim p As PrinterSetup
p = New PrinterSetup
If p.PageSetupDialog Then
g = OpenPrinterDialog§
If g <> Nil Then
for i as Integer = 0 to g.Copies//2, 3, 4 etc
g.DrawString(“Hello World”, 50, 50)
g.nextpage // <-- kicks out a page and starts a new one
Its been a ‘bug/feature/something you need to watch for’ , as long as I can remember.
To my mind, the app should print once, and the OS /printer driver should replicate it (x copies).
@ Michel and Jeff
My printer Canon LBP 3300, when called by textEdit etc. prints as many copies requested.
It’s only from Xojo that I’m experiencing this new 'bug/feature/something/
Years ago things worked all right.
So I’ll have to put a warning on the Print-window alerting the user to deal accordingly.
