Ich hab dir mal was kurzes geschrieben, was dir vielleicht weiterhelfen könnte. Musst du halt nur an deine Funktion anpassen.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var x, y: integer;
begin
x:=1;
repeat
//quadrieren des x-wertes
y:=sqr(x);
//in chart darstellen
series1.AddXY(x,y);
//x-wert erhöhen
x:=x+1;
until x=10 ;
end;
In diesem Fall wird die Anweisung (d.h. quadrieren des x-Wertes, darstellen im Chart und x-Wert erhöhen) so oft wiederholt, bis x=10 ist.