Marks not displaying on stacked bar charts
Posted: Sat Feb 06, 2016 9:29 pm
Previously my code used self stacked bar charts, and marks displayed correctly. However, I have changed to mbStacked bar charts as I want to specify the x-axis location of each bar chart. Now the marks are not displayed. The code I use to generate each series is shown.
What am I doing wrong?
Regards
Errol
What am I doing wrong?
Regards
Errol
Code: Select all
procedure AddRockSeries(AXValue,AYValue:double;ALabel:string;AColor:integer);
var
LTitle: string;
begin
LSeries := TBarSeries.Create(owner.chart);
LSeries.Marks.Visible := True;
LSeries.MultiBar := mbStacked;
LSeries.CustomBarWidth := 60;
LSeries.Marks.Font.Size := 8;
LSeries.Marks.Pen.Color := clBlack;
LSeries.BarPen.Color := clBlack;
LSeries.Marks.Clip := True;
LSeries.MarksLocation := mlCenter;
LSeries.MarksOnBar := True;
LSeries.ShowInLegend := False;
LSeries.VertAxis := aLeftAxis;
LSeries.HorizAxis := aBottomAxis;
LSeries.AddXY(AXValue,AYValue,ALabel,AColor);
end;