Aus Printer.Canvas eine Druckvor. machen oder als BMP speich

[LuckySpacy]

[df]Printer Canvas Druckvorschau[/df]
Hallo.
Ich habe eine Komponente. Dies Komponenten hat eine Methode Print.
Die Methode Print sieht wie folgt aus:

Delphi-Quellcode:

procedure Print(FromPos, ToPos: Integer);
  with Printer do
  begin
    Title := FPrintOptions.JobName;
    BeginDoc;
    PrintSelectionTo(Canvas, FromPos, ToPos);
    EndDoc;
  end;
end;

Ich möchte jetzt vor EndDoc den Inhalt von Printer.Canvas auf eine
TPaintbox oder TImage zeichnen (Eine Art Druckvorschau) oder als
Bitmap speichern. Es ist mir eigentlich egal wohin.
Die Hauptsache ich kann mir das Ergebnis auf dem Bildschirm anzeigen.

Wie geht das? Alle meine Versuchen sind bisher fehlgeschlagen.

[edit=Daniel B]Delphi-Tags eingefügt. Mfg, Daniel B[/edit]