Xojo Desktop 2019 r1.1 - Print second page

General
1

Hi!
I’m trying to print 2 pages at once.
They are 2 pages with CAD geometric drawings, lines arcs etc.
I can’t use the Report controls but I have to print directly.

My code:

Dim g As Graphics
Dim p As PrinterSetup
p = New PrinterSetup
If p.PageSetupDialog Then
  
  g = OpenPrinterDialog(p)
  If g <> Nil Then
    
    'Draw lines, arcs, etc... for first page
    
    'How I can set second page???
    
    'Draw lines, arcs, etc... for second page
    
  End If
End If

I can’t print the second page. How do you tell the Xojo to go to the next page?

Thanks!

2

Call the NextPage function to finish drawing a page and start a new one.

https://documentation.xojo.com/api/graphics/graphics.html#graphics-nextpage

1 Like
3

Thank you Tim!

I feel stupid… I spent hours looking for commands on the PrinterSetup.