Marks not displaying on stacked bar charts

[Errol]

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

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;

[Errol]

Oops - my error. Please cancel this query. A bMarksVisible parameter in our units-aware TUnitsBarSeries class was available to the Self Stacked option but not to the Stacked option, so it was always read as false.

Thanks and regards

Errol