TeeChart VCL for Borland/CodeGear/Embarcadero RAD Studio, Delphi and C++ Builder.
-
Greg Ory
- Newbie

- Posts: 1
- Joined: Mon Mar 11, 2024 12:00 am
Post
by Greg Ory » Fri Mar 15, 2024 6:01 am
Good morning,
Impossible to apply color to the legend.
when I create a single series the color in the legend applies correctly, on the other hand if I create a second series the legend colors are no longer applied.
Example :
is there a setting to apply to have all the colors of the series in the legend ?
Thanks

-
Yeray
- Site Admin

- Posts: 9645
- Joined: Tue Dec 05, 2006 12:00 am
- Location: Girona, Catalonia
-
Contact:
Post
by Yeray » Fri Mar 15, 2024 7:58 am
Hello,
Do you have a simple example project we can run as-is to reproduce the problem here?
This seems to work as expected here:
Code: Select all
uses Chart, Series;
var Chart1: TChart;
procedure TForm1.FormCreate(Sender: TObject);
var i: Integer;
begin
Chart1:=TChart.Create(Self);
with Chart1 do
begin
Parent:=Self;
Align:=alClient;
Color:=clWhite;
Gradient.Visible:=False;
Walls.Back.Color:=clWhite;
Walls.Back.Gradient.Visible:=False;
View3D:=False;
for i:=0 to 1 do
with TBarSeries(AddSeries(TBarSeries)) do
begin
Marks.Hide;
FillSampleValues;
end;
end;
end;

- bar_legend.png (10.36 KiB) Viewed 22941 times