Forum: Sonstige Fragen zu Delphi
by DeddyH,
10. Feb 2013
Siehste, dann stimmt in Deinem Code wohl etwas nicht ;)
Forum: Sonstige Fragen zu Delphi
by DeddyH,
10. Feb 2013
Ganz einfacher Test:
procedure TForm1.Button1Click(Sender: TObject);
var
i: integer;
begin
for i := 1 to StrToInt(Edit1.Text) do
ShowMessage(IntToStr(i));
end;
Stimmt das?
Forum: Sonstige Fragen zu Delphi
by DeddyH,
10. Feb 2013
Außer, dass Du die Taste nicht wieder virtuell "loslässt", fällt mir auf den ersten Blick nichts auf. Was bezweckst Du denn eigentlich?
Forum: Sonstige Fragen zu Delphi
by DeddyH,
10. Feb 2013
Zeig mal mehr Code, irgend etwas machst Du anscheinend falsch.
Forum: Sonstige Fragen zu Delphi
by DeddyH,
10. Feb 2013
5, nicht 4? Du beginnst ja bei 0, das macht dann bei einer eingegebenen 3 nach meiner Rechnung 4 mal:
0 - Erster Durchlauf
1 - Zweiter Durchlauf
2 - Dritter Durchlauf
3 - Vierter Durchlauf
Ändere doch einfach den Startwert in 1.
Forum: Sonstige Fragen zu Delphi
by DeddyH,
10. Feb 2013
Das wäre eine Möglichkeit. Solange nur ganze Zahlen bis maximal etwas über 2,1 Milliarden im Edit stehen, sollte das auch funktionieren. Zur Not hilft Ausprobieren ;)
Forum: Sonstige Fragen zu Delphi
by DeddyH,
10. Feb 2013
TEdit.Text enthält einen String, Du brauchst aber eine ganze Zahl. Daher wirst Du den String zunächst in eine solche Zahl konvertieren müssen. Mögliche Funktionen dazu sind StrToInt, StrToIntDef, TryStrToInt oder ganz historisch Val. Welche Du davon benutzen möchtest, hängt davon ab, wie Du bei Fehleingaben reagieren möchtest ("Bla" kann z.B. nicht konvertiert werden).
P.S.: Willkommen in der...