展开全部
procedure TForm1.btn1Click(Sender: TObject);
begin
//在dbchart中不显示第一个柱形
dbcht1.Series[0].ShowInLegend := false;
end;
procedure TForm1.btn2Click(Sender: TObject);
begin
//在dbchart中显示第一个柱形
dbcht1.Series[0].ShowInLegend := true;
end;
通过dbchart的各个Series[x]的ShowInLegend进行控制
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询