Delphi-PRAXiS - Delphi For Schleife

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)

- - Delphi For Schleife (https://www.delphipraxis.net/60348-schleife.html)

bigdaddy76

5. Jan 2006 16:48

For Schleife

Hallo zusammen,

ich habe ein kleines problem bzw. ein denkfehler vielleicht könnt ihr mir helfen.

ich möchte über einen button die fakultät errechnen habe aber ein fehler und ich komme nicht drauf.

Delphi-Quellcode:

			procedure TForm1.Button8Click(Sender: TObject);

var i:integer;

begin

zahl1:= strtoint(edit1.text);

for i:= 0 to zahl1 do  ergebnis

edit3.Text:= inttostr(eregbnis);

end;

end.

vielleicht könnt ihr mir helfen!

gruß
bigdaddy

ibp	5. Jan 2006 16:53

Re: For Schleife

herzlich willkommen bei dp

Delphi-Quellcode:

			procedure TForm1.Button8Click(Sender: TObject);

var i:integer;

begin

zahl1:= strtoint(edit1.text);

ergebnis:=1;

for i:= 2 to zahl1 do  

  ergebnis:=ergebnis*i;

edit3.Text:= inttostr(eregbnis);

end;

end.

..den ersten gibts gratis :zwinker:

bigdaddy76

5. Jan 2006 17:00

Re: For Schleife

das ist aber sehr nett, dass es umsonst ist....
was kostet denn wenn man mehr hilfe braucht? :roll: :roll:

tomsel

5. Jan 2006 17:11

Re: For Schleife

Zitat:

Zitat von bigdaddy76

das ist aber sehr nett, dass es umsonst ist....
was kostet denn wenn man mehr hilfe braucht? :roll: :roll:

Na, umsonst wird es hoffentlich nicht sein :zwinker:

ibp	5. Jan 2006 17:11

Re: For Schleife

Zitat:

Zitat von bigdaddy76

das ist aber sehr nett, dass es umsonst ist....
was kostet denn wenn man mehr hilfe braucht? :roll: :roll:

demnächst hirnschmalz! :thumb:

Alle Zeitangaben in WEZ +1. Es ist jetzt 10:20 Uhr.