Registriert seit: 11. Sep 2003
Ort: Linz am Rhein
796 Beiträge
Delphi 11 Alexandria
|
Re: einfache TChart Sache...
15. Dez 2004, 06:33
ValueIndex stellt nicht den Wert auf der X-Achse dar sondern ist der n-te Wert auf deiner x-Achse. Um den Wert auf der x-Achse zu bestimmen.
Schau dir mal folgendes Beispiel an. Es verlangt einfach nur eine TChart auf einem Form:
Code:
procedure TForm1.FormCreate(Sender: TObject);
begin
Series1.Add(0.5, '1,5', clRed);
Series1.Add(1.2, '2,5', clRed);
Series1.Add(2.1, '3,2', clRed);
end;
procedure TForm1.Chart1ClickSeries(Sender: TCustomChart;
Series: TChartSeries; ValueIndex: Integer; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var
dYWert: Double;
iNterWert: Integer;
dXwert: Double;
begin
iNterWert := ValueIndex;
dYWert := Series.YValue[ValueIndex];
dXWert := StrToFloat(Series.XLabel[ValueIndex]);
ShowMessage(Format('Y-Wert ist %g an n-ter (%d) Position auf der x-Achse,%sder x-Wert beträgt %g',
[dYWert, iNterWert, #13#10, dXWert]));
end;
Grüße
Mikhal
Michael Kraemer Computer erleichtern die Arbeit...
...und die Erde ist eine Scheibe!
|
|
Zitat
|