Delphi - 如何更改t图表系列调色板?

Delphi - How to change t chart series's colourpalette?

我有一个 TAreaGraph

(series[0] as tareaseries).coloreachpoint := true;
with chart1 do
    series[0].addXY( {the x-value} , {the y-value}, {name} , clTeeColor);
end;

所以现在,条形或点都是不同的颜色,但我讨厌调色板。 我在对象检查器中看到,添加新系列和选择类型时有一个选项,可以将调色板更改为 Mac Os.

我已经尝试了在运行时执行此操作的所有方法,因为我正在动态添加系列,但无济于事。 任何帮助将不胜感激!

此致, 罗马书.

将图表放在表格上并将调色板更改为 iOS 然后以文本形式查看表格会得到:

  object Chart1: TChart
    Left = 176
    Top = 136
    Width = 400
    Height = 250
    Title.Text.Strings = (
      'TChart')
    TabOrder = 0
    DefaultCanvas = 'TGDIPlusCanvas'
    ColorPaletteIndex = 18
  end

所以 属性 是 ColorPaletteIndex,对于 iOS 调色板,您将使用 18。可能某处有一个具有不错值的枚举,但该数字可以正常工作。

  chart1.ColorPaletteIndex := 18;