canvas画图，如何为一个菱形区域填色？
如题 问题点数：20、回复次数：4Top
1 楼keyz（CSDN上发附件 - www.filelet.com）回复于 2002-09-11 18:08:09 得分 10
var
P:Array [1..4] of TPoint;
begin
p[1]:=point(0,10);
p[2]:=point(10,0);
p[3]:=point(20,10);
p[4]:=point(10,20);
canvas.Pen.Style := psClear;
canvas.Brush.Color := clRed;
canvas.Polygon(p);
end;
==================================================
PhotoMark：一款快速图片水印添加工具，支持多个水印同时添加！支持批处理，支持透明水印和半透明水印，支持水印的平铺等等。是您保护图片的利器。 下载地址：
http://www.skycn.com/soft/9031.html
http://www.onlinedown.com/photomark.htm
生成的图片示例:
http://www.ncu94.com/keyzsoft/pm_exam.htmTop
2 楼dupenf（飞跃人生）回复于 2002-09-11 18:37:18 得分 0
upTop
3 楼blazingfire（烈焰)(对.net极度憎恨中....）回复于 2002-09-11 18:43:15 得分 0
“种子填充”，可以看看图形学的书，具体的忘了！Top
4 楼koyodw（京）回复于 2002-09-11 19:15:08 得分 10
Easy!!~~~~~~~
with Image1 do begin
Canvas.Brush.Color := clred;
Canvas.Polygon([Point(50, 10), Point(90, 50),
Point(50, 100), Point(10, 50)]);
end;
//
“Polygon”用来画封闭的多边型，方法很简单只要依次给出顶点就可以。
“Brush”用来填充颜色。
Top
