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
.