高手，请进，有关贴图处理，在线等待。

Question

我想在一个Image中粘帖一个小图片，我现在用的是Image.Canva.Draw 实现的，但我还想这个贴上去的这个小图片能够自由的移动及删除，请问高手，有办法实现吗？

Answer 1

我不知道是不是我理解有问题啊
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  timer1.Enabled:= false;
end;procedure TForm1.Timer1Timer(Sender: TObject);
begin
  with image2 do
  begin
    left:= left+1;
    if left = self.Left+self.Width then
    left:= self.Left-width
  end;
end;

Answer 2

不是这样的。。我只用一个TImage的控件。。在这里面进行贴图。。移动帖图，删除该贴图。。

Answer 3

就像一张大图上，任意处理一个图元一样。。可以进行移动图元、删除图元等操作。。
xixuemao(吸血猫)，不知我讲的你是否明白？？

Answer 4

看来真是我理解能力有问题了。。汗！～-_-!
我明白你的意思了，不过好像如果image控件已经有图片的话，就不能在上面draw东西了。我试试先。8好意思

Answer 5

：）为什么一定要用Image 呵!

Answer 6

看一下Image的所有方法吧，也许会收获不小。

Answer 7

用两个image不是很简单么？如果非要处理画上去的部分就要时刻记录小图片的区域，然后判断鼠标是否在该区域有操作比如说要移动的话，就要不断的清空然后根据鼠标位置重画小区域和背景

Answer 8

问题是，在里面我可能要贴许多图片。。如每贴一个就创建一个Image，占用系统资源。。
还有。。如果我要删除，就要推毁这个控件。。我用的是free，但是出错。。所以之前我也用过这种办法，但我认为这不是好办法。所以请问高手，如何处理好。

Answer 9

你可以用imageenview它带有layer功能，可以轻松实现此功能
imageenview1.layeradd
imageenview1.LayersRemove(imageenview1.LayersCurrent);

Answer 10

givemeliu(delphi英雄@@@) ::
  imageenview是何控件？？

Answer 11

Dimagen控件在 www.2ccc.com上就能找到