Forum: Object-Pascal / Delphi-Language
Delphi
by jraxxo,
28. Mär 2010
Ich hab jetzt die Auswertung in die Schleife verlegt, aber jetzt sagt er bei jeder Zahl dass sie nicht erreicht werden konnte :(
procedure TForm1.Button1Click(Sender: TObject);
var X,eingabe :extended;
I :integer;
fertig:boolean;
begin
x:=0;
eingabe:=StrtoFloat(Edit1.Text);
for I := 1 to 100000 do begin
Forum: Object-Pascal / Delphi-Language
Delphi
by jraxxo,
28. Mär 2010
Hab die Lösung. Ich bin doof. :P
Ich hab schlichtweg vergessen, X am Anfang gleich 1 zu setzen. *facepalm*
trotzdem danke. :D
so long
Joscha
Forum: Object-Pascal / Delphi-Language
Delphi
by jraxxo,
28. Mär 2010
Hallo zusammen,
ich habe ein Problem, und zwar programmiere ich gerade für einen Bekannten ein paar Sachen zusammen (wegen Iteration -> Harmonische Reihe, Bierschaumzerfall ...all solche simplen Dinge.)
Eigentlich könnte ich das auch alles... aber Delphi (ich benutze TurboDelphi 2006) ist ein bisschen bockig. Es geht um folgenden Code:
procedure TForm1.Button1Click(Sender: TObject);
var...