Listenindex überschreitet Maximum bei TChart-Komponente

[cruiser]

Problem ist die variable Länge im To-Argument

Delphi-Quellcode:

    // Dummy-Werte erzeugen
    linie1.Clear;
    max := 500 + Random(500);
    for I := 1 to max do begin
      linie1.AddXY(i, i*0.5*faktor);
    end;

Sollte das ganze lösen.

so ist auch sicher, dass die schleife mal endet