我有我想要設置包含系列標題和條的實際值的標記樣式的小節系列。這裏是我的代碼: procedure TFRDept.PopulateDeptChart;
var
Loop ,YearIndex: integer;
DeptKey: String;
StartBar, TotalBar, EndBar : TBarSeries;
begin
for Loo
我顯示了帶有複選框的ExtraLegendTool,但複選框事件不起作用。 這裏是顯示ExtraLegend代碼: procedure TFRChart.TCChartAfterDraw(Sender: TObject);
begin
if CKDisplay.Checked then
begin
with ExtraLegend do
begin