Hi, ich bin neu im Forum und habe eine Frage
wie verknüpfe ich diese Funktion mit meiner Procedure von Button 1?
ich hab folgende Ausgangslage:
das Programm soll die Fakultät der im eingegebenen Editfeld1 berechnen und mit dem Klick auf Button1 im Editfeld2 ausgeben.
hier die Funktion:
Delphi-Quellcode:
Function fak(s:string):string;
var f,f2:integer;
f1:extended;
begin
F:=0;
f1:=round(strtofloat(s));
f2:=1;
repeat begin
f:=f+1;
F2:=f2*f;
end; until f1=f;
result:=inttostr(f2);
end;
Wäre schön wenn ihr mir helfen könntet und ein bisschen erklärt, denn ich kenn mich noch nicht so gut aus.
[edit=mkinzler]Delphi-Tag eingefügt Mfg, mkinzler[/edit]