Druckproblem nach Adobe PDF und Fineprint

[iphi]

Hallo,

ich drucke in Delphi6 mit folgendem Code ein Bitmap aus:

Delphi-Quellcode:

    with Printer do
      begin
        BeginDoc;
        Canvas.StretchDraw(Rect(0, 0, w, h), FormBitmap);
        EndDoc;
      end;

Ausgabe an einen Laserjet am Parallelport geht prima, aber wenn ich den Adope PDF als Drucker auswähle, oder auch Fineprint, kommt nur eine weiße Seite an. Andere Programme hingegen drucken anstandslos in diese Senken. Woran kann das liegen?