Dwie obrazki na jednej bitmapie

Heja

Dlaczemusz wywali mi błąd w kodzie, który ma za zadanie druknąć dwa obrazki ?

 
    Naglowek := TBitmap.Create;
    Drukarka := TPrinter.Create;
    Drukarka.Orientation := poPortrait;
    Drukarka.Title:= 'Druczek';
    Naglowek.LoadFromFile('D:\Naglowek.bmp');

  Obszar := Rect((Drukarka.PageWidth div 2)-(Naglowek.Width),50,
         (Drukarka.PageWidth div 2)+(Naglowek.Width),50+(Naglowek.Height * 2));

    Drukarka.BeginDoc;
      Drukarka.Canvas.StretchDraw(Obszar, Naglowek);

   //reszta kodu....bla bla bla...

    Naglowek.Free;
    Naglowek.Destroy;

    Naglowek:= TBitmap.Create;
    Naglowek.LoadFromFile('D:\obrazek.bmp');

  Obszar2 := Rect((Drukarka.PageWidth div 2)-(Naglowek.Width),4000,
         (Drukarka.PageWidth div 2)+(Naglowek.Width),50+(Naglowek.Height * 2));

         Drukarka.Canvas.StretchDraw(Obszar2, Naglowek);

    Naglowek.Free;
    Naglowek.Destroy;

Drukarka := Printer;
Zajrzyj może do help'a

Żadnych wywołań Destroy; wystarczy Free;

Matko jedyna w życiu bym na to nie wpadł...

Dziękuję bardzo. działa :)