Ich habe das so gemacht. Den Series ein Afteraddereignis hinzufügen
Delphi-Quellcode:
procedure TMakrofenster.StromSeriesAfterAdd(Sender: TChartSeries;
ValueIndex: Integer);
var
step:Double;
begin
step:=DateTimeStep[dtOnesecond]*tusvchart(sender.Owner).Anzahlsekunden;
With Sender.GetHorizAxis do { <-- with the Horizontal Axis... }
Begin
Automatic := False;
//always show the last time
Maximum := Sender.XValues.MaxValue;
// show only last desired interval
Minimum := Maximum - step;
end;
// Delete all "invisible" points
While (Sender.Count>0) and
(Sender.XValues[0] < Sender.GetHorizAxis.Minimum) do
Sender.Delete(0);
end;
Beim mir war die X-Achse eine Zeitangabe, Du kannst es allerdings sicher auf die Anzahl umschreiben