Registriert seit: 6. Mär 2013
6.176 Beiträge
Delphi 10 Seattle Enterprise
|
AW: Manipulation der TChart Achsenbeschriftung
24. Apr 2020, 14:17
Hallo-
In dem Fall bei so einem festen Bereich würde ich die Achsen-Einteilung komplett selbst malen:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var
xData, yData: TArray<Double>;
index: Integer;
chartAxis: TChartAxis;
begin
xData := [0.0, 1.0, 2.0, 3.0, 4.0, 5.0];
yData := [0.25, 0.36, 0.0, 0.78, 1.0];
chartAxis := Chart1.Axes.Left;
chartAxis.Automatic := False;
chartAxis.SetMinMax(-1.0, +1.0);
chartAxis.Items.Add(-1.0, '- 10 mm');
chartAxis.Items.Add(-0.5, '- 5 mm');
chartAxis.Items.Add(0, ' 0 mm');
chartAxis.Items.Add(+0.5, '+ 5 mm');
chartAxis.Items.Add(+1.0, '+ 10 mm');
for index := Low(xData) to High(xData) do
Series1.AddXY(xData[index], yData[index]);
end;
Sieht dann so aus:
|
|
Zitat
|