怎么加事？(30分)

我想copy一个位图，但如果copy在Timage上就能显示，在Tform上就不显示，为什么？
下面是程序的代码：
var
b:Timage;
begin
b:=Timage.Create(self);
b.picture.LoadFromFile('D:/Program Files/超级解霸/副本.bmp');
b.autosize:=true;
bitblt(form1.canvas.handle,0,0,b.width,b.height,
b.canvas.handle,0，0,srccopy);
end;

procedure TForm1.Button1Click(Sender: TObject);
var
b :Timage;
begin
b :=Timage.Create(self);
b.picture.LoadFromFile('f:/图片/end004.bmp');
b.autosize :=true;
bitblt(Form1.canvas.handle,0,0,b.width,b.height,
b.canvas.handle,0,0,srccopy);
end;

一点错误也没有啊。

有错吗？不会吧。[8D]

多人接受答案了。