TChart - Wie immer aktuellen Wert anzeigen

[DoktorD]

Hi.

Probiere jetzt schon seit Stunden aus, wie ich beim Tchart immer den aktuellen Wert sehen kann.
Ich will mir z.B. 5 Werte immmer aktuell ansehen
Wenn ich Werte hinzufüge, sehe ich den 6. Wert nicht mehr, da er rechts auf den nächsten Seite zu sehnen ist.

Wie kann ich denn immer die aktuellsten 5 Werte sehen? Die alten Werte sollen einfach nach Links geschoben werden und können dann aber bei Bedarf wieder angeschaut werden

Im Anhang mein Beispiel Projekt


Vielen Dank

[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.