Canvas问题:请问如何在TImage上作Canvas,使所画的图形直接画于图片上,而不清除原图像?(100分)

  • 主题发起人 WRainbug!
  • 开始时间
W

WRainbug!

Unregistered / Unconfirmed
GUEST, unregistred user!
Canvas问题:请问如何在TImage上作Canvas,使所画的图形直接画于图片上,而不清除原图像?
如果用2个TImage重叠在一起,会有白色的背景,怎么去掉?
如:在image上画条直线,怎样保留原image.picture;
谢谢...
 
首先用CopyRect(或BitBlt)进行图片的拷贝,然后再在上面写字或者画线
 
谢谢,KY99.我感觉不太合适...
各位有其他方法没有?
 
Image1.Transparent:=True;
 
TCanvas.copymode可以支持
 
直接在Image的Canvas上绘图,第二次绘的不会把第一次的清除,例如:
procedure TForm1.Image1Click(Sender: TObject);
begin
Image1.Canvas.LineTo(random(202),10+random(100));
end;
 
谢谢DarwinZhang兄弟.
用2个TImage控件重叠,在上面的一个Transparent属性为true;
就可以很简单方便的解决这个问题.

也谢谢其他朋友呀.呵呵~~~~~
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
顶部