Цвет серий в TChartLegend

← →
Вопрос (2004-08-02 13:43) [0]

Подскажите пожалуйста, как изменять цвет примера в Legend. У меня несколько серий (кривых) на одном графике. Они разноцветные. Дело в том, что в Chart1.Series[i].Addxy(x,y,"",clr)цвет задаю вручную (clr варьируется). А цвет пояснений что есть что в легенде (сверху справа) - остаётся по умолчанию. Например графики голубой и жёлтый, а в легенде цвета остаются красным и зелёным по умолчанию. Как в коде программы изменить цвет?

← →
Ega23 © (2004-08-02 13:46) [1]

Applies to
TChartLegend component

Declaration
property Font : TFont;

Description

The Font property determines the font used to draw all Legend text items. The Legend calculates its dimensions based on Font size and attributes as well as TChartLegend.ColorWidth and TChartLegend.Frame properties settings.

← →
Вопрос (2004-08-02 13:56) [2]

" to draw all Legend text items."
А мне то надо для каждой серии!
Причём даже не цвет шрифта, а там цвет примера (либо квадратик, либо линия - см здесь: http://sailor.1gb.ru/other/legend.jpg) !

← →
Вопрос (2004-08-02 13:56) [3]

← →
Ega23 © (2004-08-02 13:57) [4]

А мне то надо для каждой серии!

Тогда создавай наследника от TChartLegend, где цвет будет задаваться для каждой серии.

← →
Вопрос (2004-08-02 14:09) [5]

"Тогда создавай наследника от TChartLegend, где цвет будет задаваться для каждой серии."
Как это сделать? И как задать цвет не тексту, а именно примеру графика (см. ссылку выше, текст пусть будет чёрным как и был - главное сделать "квадратики" не красным и зелёным а голубым и каким-то сероголубым - не важно).

← →
Вопрос (2004-08-02 14:14) [6]

Я вот как рассуждаю: создаётся N серий Chart1.Series[i]:

for i:=0 to N-1 do
begin
...
ls := TBarSeries.Create(nil);
Chart1.AddSeries(ls);
...
end;

Каждая новая серия - другого цвета (цвета задаются по умолчанию - красный, зелёный, жёлтый, синий и т.д.). И такого же цвета соответственно делаются примеры в легенде. Но ведь эти цвета должны храниться в каком-нибудь свойстве Chart1.Series[i]! Или нет?

Цвет серий в TChartLegend Найти похожие ветки