var
Bitmap: TBitmap;
MyRect, MyOther: TRect;
begin
MyRect := Rect(10,10,100,100);
MyOther := Rect(10,111,100, 201);
Bitmap := TBitmap.Create;
Bitmap.LoadFromFile('c:\windows\tartan.bmp');
// Form1.Canvas.BrushCopy(MyRect, Bitmap, MyRect, clBlack);
Form1.Canvas.CopyRect(MyOther,Bitmap.Canvas,MyRect);
Bitmap.Free;
end;
我的问题:
1:我怎样知道相片文件的象素呢?(因为我要从其中件位置复制到右侧边上。)
2:Form1.Canvas.CopyRect(MyOther,Bitmap.Canvas,MyRect);的意思是说,从myrect大小的图片复制成MYOTHER大小的图片吗?
3:怎么用ASSIGN把图片保存呢?
谢谢!!!