Delphi Tchart 左轴时间标签
Delphi Tchart leftaxis time labels
我想使用 TChart 来评估时间。 (如 1:12; 1:15; 1:13; ...)为此,我想在 X 轴上显示实验 (1,2,3 ...)。 Y 轴应该是时间图例。 (如 X 轴上的照片所示)。
不幸的是,我只在 X 轴上成功了。
Y轴我希望的时间传说
我试过的:
procedure kMyDiagram.config;
Begin
mychart.LeftAxis.LabelStyle := taltext;
DataLine:=TLineSeries(MyChart.Series[0]);
end;
procedure kMyDiagram.myDiagramMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer)
begin
timecounter:=timecounter +10;
time:=strtotime('00:0'+ timecounter);
DataLine.AddXY(DataLine.XScreenToValue(x),DataLine.YScreenToValue(y),timetostr(time));
end;
这会创建类似的东西...
Y 轴和 X 轴上的时间标签(并且应该有像 1,2,3...这样的整数)
那么如何制作这个自定义 Y 轴?
预先感谢您的回答。
我用 TLineSeries
创建了新的 TChart
,并做了唯一的设置:Series1-General-Vertical Axis-DateTime
复选框。
现在下面的代码生成的图表在 X 轴上带有 0..7
个标签,在 Y 轴上带有 0:00, 0:30...7:00
个标签(1/24 是一小时)
var
i: integer;
begin
for i := 0 to 7 do
Series1.AddXY(i, (i * i) / 7 * 1/24);
我想使用 TChart 来评估时间。 (如 1:12; 1:15; 1:13; ...)为此,我想在 X 轴上显示实验 (1,2,3 ...)。 Y 轴应该是时间图例。 (如 X 轴上的照片所示)。 不幸的是,我只在 X 轴上成功了。
Y轴我希望的时间传说
我试过的:
procedure kMyDiagram.config;
Begin
mychart.LeftAxis.LabelStyle := taltext;
DataLine:=TLineSeries(MyChart.Series[0]);
end;
procedure kMyDiagram.myDiagramMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer)
begin
timecounter:=timecounter +10;
time:=strtotime('00:0'+ timecounter);
DataLine.AddXY(DataLine.XScreenToValue(x),DataLine.YScreenToValue(y),timetostr(time));
end;
这会创建类似的东西...
Y 轴和 X 轴上的时间标签(并且应该有像 1,2,3...这样的整数)
那么如何制作这个自定义 Y 轴?
预先感谢您的回答。
我用 TLineSeries
创建了新的 TChart
,并做了唯一的设置:Series1-General-Vertical Axis-DateTime
复选框。
现在下面的代码生成的图表在 X 轴上带有 0..7
个标签,在 Y 轴上带有 0:00, 0:30...7:00
个标签(1/24 是一小时)
var
i: integer;
begin
for i := 0 to 7 do
Series1.AddXY(i, (i * i) / 7 * 1/24);