TChart - Wie immer aktuellen Wert anzeigen

[Andreas Schilling]

Wie du das bei deinem zur Laufzeit erstellten Series einfügst? Meine series ist schon in der Entwicklungsumgebung da.

Delphi-Quellcode:

procedure TAuswerten_F.Series1AfterAdd(Sender: TChartSeries;
  ValueIndex: Integer);
begin
  Sender.GetHorizAxis.Automatic := False;        { <-- we dont want automatic scaling }

  Sender.GetHorizAxis.Maximum := Sender.GetHorizAxis.Maximum + 1;
  if Sender.GetHorizAxis.Maximum > 5
  then Sender.GetHorizAxis.Minimum := Sender.GetHorizAxis.Maximum - 5;
end;

Für das Scrollen habe ich noch eine extra Funktion auf zwei Button, wo ich jeweils die Werte für Sender.GetHorizAxis.Minimum und Maximum neu setze.