Problem mit Printers und Adobe X

[iphi]

Hallo,

ich versuche ein Bitmap aus einem TImage mit der Printers-Unit auszudrucken:

Delphi-Quellcode:

uses
  Printers, ...
...
 with Printer do
   begin
     Title:='test'; //nötig für Adobe X
     BeginDoc;
     Canvas.TextOut(0,0,''); //ohne den erscheint auf dem Adobe X pdf nichts!!!???
     Canvas.StretchDraw(Rect(0, 0, Image1.picture.Width, Image1.Picture.Height),
                                   Image1.Picture.Graphic);
     EndDoc;   
   end;

Grundsätzlich funktioniert das. Seltsam ist allerdings das Verhalten beim Drucken in den Adobe X PDF-Writer:
Wenn ich die Zeile Canvas.TextOut(0,0,''); auskommentiere, wird ein leeres Blatt gedruckt. Auf den anderen Druckern funktioniert es mit und ohne TextOut. Hat jemand eine Idee, warum das so ist? Habe ich bei der Initialisierung etwas vergessen?