Problem mit Funktion

[Schwabe]

Hallo erstmal

Also ich bin so ziemlicher Delphianfäger und hab ein Problem mit einer Funktion.

Ich habe 2 Eingabefelder:

EZahl, EHochzahl ( dazwischen steht: x^)

und einen Hinzufügbutton:

BHinzufuegen Die Funktion:

Delphi-Quellcode:

function f(x: extended): extended;
begin
  result:= result + StrToFloat(z)*Power(x,StrToFloat(hz));
end;

Jetzt soll jedesmal wenn ich auf den Hinzufügbutton klick die Fubnktion aufaddiert werden. Also so

result:= result + StrToFloat(z)*Power(x,StrToFloat(hz));

Am Ende muss dann f(x) gezeichnet werden mit folgendem code:

Delphi-Quellcode:

procedure TForm1.Kurve_Zeichnen;

var i,j: integer;
    x,y: real;

begin
  with ISchaubild do
  begin
    i:=0;
    x:=(i-Ursprung.i)/Einheit;
    y:=f(x);
    j:=-round(y*Einheit)+Ursprung.j;
    Canvas.MoveTo(i,j);

    for i:=1 to width do
    begin
      Canvas.Pen.Color:=clblack;
      x:=(i-Ursprung.i)/Einheit;
      y:=f(x);
      j:=-round(y*Einheit)+Ursprung.j;
      Canvas.LineTo(i,j);
      end;
  end ;
end;

Es tut schon alles außer des mit der Funktion.

Wie kann ich das bewerkstelligen?

Hab schon vieles ausprobiert aber mir fehlen einfach die erforderlichen Kentnisse. Wäre nett wenn mir jemand helfen könnte!


Ps: Hoffe ihr könnt aus meiner Beschreibung das Problem erkennen.