大虾请进：有关image的问题(200分)

在中有一格式的位图，要在上面画圆，圆内部分显示，圆外不显示，该怎么办？
谢谢！！

使用区域就可以了。
--------------------------
水晶控件
http://www.codeidea.com

圆形区域的裁减！tyn的代码！

procedure TForm1.BitBtn1Click(Sender: TObject);
var
Bmp :TBitmap;
FRgn :HRGN;
begin
Bmp :=TBitmap.Create;
Bmp.PixelFormat :=Image1.Picture.Bitmap.PixelFormat;
Bmp.Width :=200;
Bmp.Height :=200;

BitBlt(Bmp.Canvas.Handle,0,0,Bmp.Width,Bmp.Height,Image1.Canvas.Handle,80,
80,SRCCOPY); FRgn :=CreateEllipticRgn(0,0,200,200); SelectClipRgn(Image1.Canvas.Handle,FRgn); //Ñ¡Ôñ¼ôÇÐÇøÓò
Image1.Canvas.Draw(0,0,Bmp);
Bmp.Free;
DeleteObject(FRgn);
end;
end.

thanks!