TChart Achsenbereich

[rich123]

Hallo zusammen,

Wenn ich in meinem TChart Werte reinschreibe erweitert sich die X-Achse und das Diagramm wird gestaucht. Das kann ja bei z.b. 5000-Werten dazu führen, dass ich nichts mehr erkennen kann.

Ich trage meine Werte über eine For - Schleife und einem Sleep Timer ein und sehe wie sich das Diagramm aufbaut.
Um das stauchen zu verhindern, habe ich eingestellt, dass nur 25-Werte angezeigt werden.

Mein Problem ist aber nach den 25 Werten zeichnet er aus der Skalierung hinaus, wie kann ich es einstellen, dass sich die Skalierung mit weiterbewegt, aber trotzdem pro Page nur die 25 Werte angezeigt werden?

Danke schonmal

Gruß

[Andreas Schilling]

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 > 25 
  then Sender.GetHorizAxis.Minimum := Sender.GetHorizAxis.Maximum - 25; 
end;

[rich123]

Top! Super Danke funktioniert

Gruß