Druckerprobleme

Ich will in meinem Delphiprogramm eine automatisch generierte
Seite ausdrucken.
Das Aussehen der Seite gestalte ich zuerst in einer eigenen
TBitmap-Instanz.
Diese weise ich dem Drucker-Canvas dann auf folgende Art zu:

var forprint: tbitmap;

printer.begindoc;
printer.canvas.draw(0,0, forprint);
printer.enddoc;

Nur wenn ich es so ausdrucken will, dann kommt nur eine leere
Seite aus dem Drucker.
Das forprint-Bitmap enthält die korrekte Seite, das konnte ich
bereits überprüfen. Auch wenn ich direkt etwas auf den
Printer-Canvas zeichne wird es gedruckt, nur das Bitmap will
er nicht drucken.
Das forpaint-Bitmap hat dieselbe Auflösung wie der
Printer-Canvas, nur dass es Schwarz-weiss ist und mein Drucker
auch farbig drucken kann.
Ich sitz nun schon einige Zeit daran, weiss jemand woran das
liegt?

Danke
Gruß
Mario