tbitmap bewegen

[Julzn]

tag leutz,
alos ich hab jetzt schon ziemlich lang gesucht un auch sachen gefunden...
aber bei mir funzt des alles ned so ganz, oder ich bin einfach zu blöd dafür.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  a:=150;
  b:=150;
  bmp[0]:= tbitmap.Create;
  bmp[0].LoadFromFile('b_rot.bmp');
  bmp[0].TransparentColor:=clblue;
  bmp[0].Transparent:=true;
  bmp[0].Width:=50;
  bmp[0].Height:=50;
  canvas.Draw(150,150,bmp[0]);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  a:=a+5;
  b:=b+10;
  BitBlt(pb.Canvas.Handle,a,b,bmp[0].width,bmp[0].Height,bmp[0].Canvas.Handle,a,b,SrcCopy);
end;

also wenn ich den ersten button drück malt er was er soll, aber wenn ich dann den andren drück passiert gar nix. könnt ihr vllt mal erklären was da bei bitblt so alles in den klammern steht. was zb die werte wo jetzt a und b steht sind.

thx