这样的。我这样写为什么结果a.bmp中是空的呢?
a , b : TRect;
  c:Tbitmap;  begin
  a:=rect(0,0,80,80);
  b:=rect(0,0,80,80);
  c:=Tbitmap.create;
  c.Canvas.BrushCopy(a,image1.Picture.Bitmap,b,clblack);
  c.SaveToFile('c:\a.bmp');
而这样写却对了。为什么?a , b : TRect;
  c:Tbitmap;  begin
  a:=rect(0,0,80,80);
  b:=rect(0,0,80,80);
  c:=Tbitmap.create;    image2.Canvas.BrushCopy(a,image1.picture.bitmap,b,clwhite);
   image2.Picture.SaveToFile('c:\abc.bmp');
这时abc却是有内容的。
是BMP的方法brushcopy有问题吗