为什么保存出的bmp字节数为0(50分)

  • 主题发起人 主题发起人 dain
  • 开始时间 开始时间
D

dain

Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.Button1Click(Sender: TObject);
var
Bitmap, Bitmap1: TBitmap;
MyRect, MyOther: TRect;
begin
MyRect := Rect(20,20,100,100);
MyOther := Rect(20,20,100,200);
Bitmap := TBitmap.Create;
Bitmap1 := TBitmap.Create;
Bitmap.LoadFromFile('D:/kjjwd/face/splash.bmp');
Bitmap1.Canvas.CopyRect(MyOther,Bitmap.Canvas,MyRect);
Bitmap1.SaveToFile('c:/windows/desktop/aa.bmp');

Bitmap.Free;
Bitmap1.Free;
end;
 
myRect,myOther中没有一个存放了bitmap中的图象,故
bitmap1中也没有图象,所以保存的bmp为0,知道问题所在了吧
 
当然了,
嘿嘿!
一定会这样的。
 
你的myRect,myOther中根本就没有图象嘛!
 
接受答案了.
 
后退
顶部