images in Paintbox mit BitBlt-Prozedure

[ontorius]

Um Bilder aus einer Datei in einer Paintbox anzuzeigen habe ich folgende Zeilen geschrieben:

Delphi-Quellcode:

var
  Form1: TForm1;
  b:integer;
  bg:TBitmap;
  const x=10;
        y=10;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender:TObject);
begin
  bg:=TBitmap.Create;
  bg.PixelFormat := pf24Bit;
end;

procedure TForm1.START1Click(Sender: TObject);
begin
  timer2.Enabled:=false;
  form1.DoubleBuffered:=true;

  bg.loadfromfile('.\pics\trasch24b.bmp');
  Bitblt(paintbox1.Canvas.Handle,0,555,1036,50,bg,0,0,srccopy);
  paintbox1.Canvas.Draw(0,555,bg);

  image2.picture.loadfromfile('.\pics\stehen_1.bmp');
  image5.Picture.LoadFromFile('.\pics\door.bmp');
end;

Beim compilieren wird mir zur BitBlt-Prozedur der Fehler "inkompatibler Typ: 'HDC' und 'TBitmap'" angezeigt. Ich glaube, dass der Fehler in der Variablen "bg" liegt, die nicht mit BitBlt kompatibel ist. Wie kann man das lösen und worauf muss man bei diesem Befehl (bitBlt) achten?