TGrid - Werte löschen - List index out of bounds

[Andy386]

Mein Problem ist das folgende: ich möchte in einem TChart verschiedene Serien anzeigen, eine davon ist problematisch, da sie einmal aus nur einem Punkt besteht und mal aus zweien. Immer abwechselnd. Um das zu zählen habe ich eine globale Variable clickcount.

Das Ganze funktioniert einmal, dann stürzt das Programm ab, Meldung: "List index out of bounds (2)"
Mit delete hab ich's auch schon probiert, kommt dasselbe

Delphi-Quellcode:

b:=false;
case clickcount of
0:     begin
            if (Chart1.Series[0].Count>0) then b:=true;
            if b then Chart1.Series[0].Clear;
            ...
            Chart1.Series[0].AddXY(X,Y);
            if b then Chart1.Series[0].AddNullXY(0,0,'');
            clickcount:=1;
       end;
1:     begin
            ...
            Chart1.Series[0].AddXY(X,Y);
            clickcount:=0;
            end;

[Andy386]

aaalso, ich habs jetzt.
Die Länge muss immer konstant sein, hab auch nix gefunden, wo man die Länge einstellen kann (sowas wie das nullte element einer charkette bei c)

beim case=0 mache ich noch ein Element, wo man es nicht sehen kann, was ich dann bei case=1 lösche

Delphi-Quellcode:

i:=Chart1.Series[0].Count;
Chart1.Series[0].delete(i-1);