在 VCL TeeChart 的甘特图行上设置单个标签的样式
Style individual Labels on Gantt-Rows in a VCL TeeChart
我在 Delphi XE3 VCL 应用程序中使用 TeeChart(内部版本 2020.30.200525)。
在那个应用程序中,我正在设置一个甘特图系列,我想在左轴上设置一个单独的行标签的样式,以将其与其他行标签区分开来。
更改标签的颜色或字体样式或使用背景突出显示它。
我怎样才能做到这一点?
我找到了可以用来更改标签文本的 OnGetAxisLabel
事件。
我也试过 Axes.Left.Items
,但即使在我向甘特系列添加了多个值后,它也只有一个元素。
您需要强制重新绘制图表以填充轴项目。即:
uses VclTee.GanttCh;
procedure TForm1.FormCreate(Sender: TObject);
begin
Chart1.AddSeries(TGanttSeries).FillSampleValues;
Chart1.Draw; // Force a repaint to populate Axis Items
Chart1.Axes.Left.Items.Automatic:=False;
Chart1.Axes.Left.Items[2].Format.Font.Color:=clRed;
end;
我在 Delphi XE3 VCL 应用程序中使用 TeeChart(内部版本 2020.30.200525)。
在那个应用程序中,我正在设置一个甘特图系列,我想在左轴上设置一个单独的行标签的样式,以将其与其他行标签区分开来。
更改标签的颜色或字体样式或使用背景突出显示它。
我怎样才能做到这一点?
我找到了可以用来更改标签文本的 OnGetAxisLabel
事件。
我也试过 Axes.Left.Items
,但即使在我向甘特系列添加了多个值后,它也只有一个元素。
您需要强制重新绘制图表以填充轴项目。即:
uses VclTee.GanttCh;
procedure TForm1.FormCreate(Sender: TObject);
begin
Chart1.AddSeries(TGanttSeries).FillSampleValues;
Chart1.Draw; // Force a repaint to populate Axis Items
Chart1.Axes.Left.Items.Automatic:=False;
Chart1.Axes.Left.Items[2].Format.Font.Color:=clRed;
end;