Druckvorschau Querformat

[fachinformatiker]

Ich habe ein kleines Problem, ich habe eine Componente, mit der ich einen Druck erstelle. Jetzt wollte ich noch eine Druckvorschau einbauen. Hierzu habe ich den Code vom Delphi 7 Kochbuch verwendet.

Bei meiner Druckprocedure kann ich aber Hochformat und Querformat drucken.

Jetzt habe ich zwei Probleme mit der Druckvorschau:

1. Wie bekomme ich mit einem TCanvas Objekt eine zweite Seite realisiert?
2. Wie bekomme ich am leichtesten die Forschau bei Querformat erstellt.

Kann mir jemand helfen? Danke!