Image1上放一个Image2, 如何把重叠的图像复制到Image3里?请兄弟们赐教!

Question

说说思路也可以,如果有示例代码,不胜感激!

Answer 1

不是很明白，是求相交的图象还是将图象2放到图象1里。
不过处理方法类似：
先放一个Image1，然后把Image2放到Image1上面，Image2小一点，看着清晰。
然后旁边放个Image3，下面的代码把Image1,Image2的重叠后的图象拷贝到Image3中。procedure TForm1.Button1Click(Sender: TObject);
var
    rect:TRect;
/////////由于Image2<Image1，所以所有的区域就是Image1的客户区，若取交集，只要你按照
/////////两个Image的坐标能够计算出这个rect
begin
    rect.Left:=Image1.Left;
    rect.Top:=Image1.Top;
    rect.Bottom:=Image1.Top+Image1.Height;
    rect.Right:=Image1.Left+Image1.Width;
    Image3.Canvas.CopyRect(Image3.ClientRect,Canvas,rect);
    Image3.Picture.SaveToFile('c:\test.bmp');
end;