饼图填充, 在线等,解决即结贴 类似于Excell 中的饼图,如何用不同的色彩来填充我所分的区域《假如分成5 个不均等区域》 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 楼主想做成什么样子的?chart控件不是就可以实现你现在所说的功能吗? 使用API函数FillRgn可以实现:var pary:array of tpoint; myPolygonRgn:hrgn;type PPoints = ^TPoints; TPoints = array[0..0] of TPoint; try myPolygonRgn:=CreatePolyRgn(Pary); fillrgn(Image4.canvas.handle,myPolygonRgn,Image4.canvas.brush.handle) finally deleteobject(myPolygonRgn); end; 现在是不使用Chart 控件,自已在PaintBox 上绘制。楼上所述,测试中 哦 用Canvas的FloodFill方法就可以了 TChart增加一个Pie不用做其它代码,系统会自动对不同块用不同颜色表示。 我是自己做一个类似TChart 的图,并自己分成几个区呢,如何??, 请教!!!! 使用 UDP 发送图片,总是要掉包,该如何解决? 求助delphi运算符问题。 菜鸟问题!急!请大虾们指点! 考试报名系统程序!谁帮帮我 Delphi是一种语言还是开发工具? ding Delphi运行问题请教 ★dbExpress页的SqlConnection设置奇怪问题 Delphi+SQL Server 关于进仓单规则的应用 我想了好。。。。。。长时间的问题?能帮帮我么?!!!! 怎样在 Delphi 中建立一个新的数据库 怎样设置MDI子窗体没有标题栏? 在D7中,有一个fsMDIForm,fsMDIChild若干,为什么点FfsMDIChildr的关闭时却是最小化?怎么样可关闭?
chart控件不是就可以实现你现在所说的功能吗?
var pary:array of tpoint;
myPolygonRgn:hrgn;
type
PPoints = ^TPoints;
TPoints = array[0..0] of TPoint;
try
myPolygonRgn:=CreatePolyRgn(Pary);
fillrgn(Image4.canvas.handle,myPolygonRgn,Image4.canvas.brush.handle)
finally
deleteobject(myPolygonRgn);
end;
楼上所述,测试中 哦