透明系列的 TeeChart 非透明标记 - 可能吗?
TeeChart non-transparent Mark for a Transparent Series - is it possible?
Delphi 10.1 Pro,带有嵌入式 TeeChart 的 VCL。
我有一个 75% 透明的 AreaSeries,我希望它的 Marks 是 非透明的 ,或者 字体不透明.
我尝试了以下但没有成功:
Marks[0].Transparent := false; // <- DOESN'T HELP
Marks[0].Transparency:= 0; // <- DOESN'T HELP
tAreaSeries 及其标记创建如下:
procedure TForm2.AddAreaSeries(aMin, aMax, aSeriesTransparency: integer);
begin
with Chart1.AddSeries(tAreaSeries) as tAreaSeries do
begin
AddXY(aMin, 10); // Two point AreaSeries
AddXY(aMax, 10);
SeriesColor := clGreen;
Transparency := aSeriesTransparency; // <- Series Transparency
Marks[0].Color := clRed;
Marks[0].Transparent := false; // <- DOESN'T HELP
Marks[0].Transparency:= 0; // <- DOESN'T HELP
Marks[0].Visible := true;
Marks[1].Visible := true;
Marks.Visible := true; // Global Visibility for all Markers
end;
end;
为了演示,我调用了上面两次,一次是非透明 (0%),另一次是 75% 透明度:
procedure TForm2.FormCreate(Sender: TObject);
begin
Chart1.View3D := false;
Chart1.Axes.Bottom.SetMinMax(0,10);
// Adding two AreaSeries
AddAreaSeries(1, 4, 0); // Non transparent AreaSeries
AddAreaSeries(6, 9, 75); // 75% transparent AreaSeries
end;
这是带有评论的屏幕截图:
感谢您的帮助。
系列的标记有一个布尔选项 UseSeriesTransparency
,您只需将其设置为 false 即可设置独立于系列的透明度。
Series2.Marks.UseSeriesTransparency := false;
在 UI 中,选项是一个复选框。
Delphi 10.1 Pro,带有嵌入式 TeeChart 的 VCL。
我有一个 75% 透明的 AreaSeries,我希望它的 Marks 是 非透明的 ,或者 字体不透明.
我尝试了以下但没有成功:
Marks[0].Transparent := false; // <- DOESN'T HELP
Marks[0].Transparency:= 0; // <- DOESN'T HELP
tAreaSeries 及其标记创建如下:
procedure TForm2.AddAreaSeries(aMin, aMax, aSeriesTransparency: integer);
begin
with Chart1.AddSeries(tAreaSeries) as tAreaSeries do
begin
AddXY(aMin, 10); // Two point AreaSeries
AddXY(aMax, 10);
SeriesColor := clGreen;
Transparency := aSeriesTransparency; // <- Series Transparency
Marks[0].Color := clRed;
Marks[0].Transparent := false; // <- DOESN'T HELP
Marks[0].Transparency:= 0; // <- DOESN'T HELP
Marks[0].Visible := true;
Marks[1].Visible := true;
Marks.Visible := true; // Global Visibility for all Markers
end;
end;
为了演示,我调用了上面两次,一次是非透明 (0%),另一次是 75% 透明度:
procedure TForm2.FormCreate(Sender: TObject);
begin
Chart1.View3D := false;
Chart1.Axes.Bottom.SetMinMax(0,10);
// Adding two AreaSeries
AddAreaSeries(1, 4, 0); // Non transparent AreaSeries
AddAreaSeries(6, 9, 75); // 75% transparent AreaSeries
end;
这是带有评论的屏幕截图:
感谢您的帮助。
系列的标记有一个布尔选项 UseSeriesTransparency
,您只需将其设置为 false 即可设置独立于系列的透明度。
Series2.Marks.UseSeriesTransparency := false;
在 UI 中,选项是一个复选框。