起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 759|回复: 12

【结贴】设置饼状图颜色,有出入。

[复制链接]
发表于 2010-7-8 09:58:48 | 显示全部楼层 |阅读模式
var
    colorList: array of integer;
    i: integer;
begin

    SetLength(colorList,20);


    colorList[0] :=  $199B9B;
    colorList[1] :=  $199B9B;
    colorList[2] :=  $B2B2B2;
    colorList[3] :=  $B2B2B2;
    colorList[4] :=  $B2B2B2;

    i := 0;
    self.Series1.Clear;

    self.DataSetBroker1.DataSet.First;
    while not self.DataSetBroker1.DataSet.Eof do
    begin
        self.Series1.AddPie(self.DataSetBroker1.DataSet.FieldByName('lineAmount').AsFloat,
        self.DataSetBroker1.DataSet.FieldByName('BugCodeId').AsString,colorList);

        //self.Series1.Active := true;
        self.Series1.RefreshSeries;

        if i <> 19 then
        begin
            i := i + 1;
        end
        else
            i := 0;

        self.DataSetBroker1.DataSet.Next;
    end;
end;


如代码设置饼状图颜色后,和希望的颜色不一致,如在colorList[0] 中设置的色值是199B9B,但是显示出来的颜色和色值不符,请问是什么原因,是不是有颜色叠加了,Series和datachart的背景色我都设置成白色了
回复

使用道具 举报

发表于 2010-7-8 10:23:16 | 显示全部楼层
贴个图看一下。
回复 支持 反对

使用道具 举报

 楼主| 发表于 2010-7-8 10:25:47 | 显示全部楼层
如图在colorlist[0],和colorlist[1]中是以下颜色,

未命名colorlist1.jpg

3.41 KB, 下载次数: 229

回复 支持 反对

使用道具 举报

 楼主| 发表于 2010-7-8 10:27:13 | 显示全部楼层
其余的是这种颜色:

未命名colorlist2.jpg

3.31 KB, 下载次数: 215

回复 支持 反对

使用道具 举报

 楼主| 发表于 2010-7-8 10:30:41 | 显示全部楼层
但是出来的效果这是这样的:

未命名效果.jpg

17.41 KB, 下载次数: 216

回复 支持 反对

使用道具 举报

发表于 2010-7-8 11:23:25 | 显示全部楼层
回复 支持 反对

使用道具 举报

发表于 2010-7-8 15:26:40 | 显示全部楼层
你是怎么知道 199B9B 是3楼的颜色的。我用lable 测试了一下,不是的哦

无标题.gif

1.21 KB, 下载次数: 200

回复 支持 反对

使用道具 举报

发表于 2010-7-8 15:30:35 | 显示全部楼层
你把     colorList[0]  和  colorList[1]  赋值  Business.System.Graphics.clTeal;   这个看看
回复 支持 反对

使用道具 举报

 楼主| 发表于 2010-7-8 15:48:42 | 显示全部楼层
199B9B是经过3楼RBG转换的是16进制的数,我用label测试过是对的
回复 支持 反对

使用道具 举报

发表于 2010-7-8 16:32:14 | 显示全部楼层
那你用我8楼的那个赋进去是否ok
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-8 01:36 , Processed in 0.044977 second(s), 18 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表