hi und zwar habe ich mich gerade mal dran gesetzt und wollte etwas ganz banales machen, da ich noch ein voll noob bin.
Ich hatte vor, eine art Uhr zu machen.
Wenn man auf einen Button klickt, sollte in einem label die zahlen 1-59 ersteinen.
Aber nicht auf einmal, sondern im Sekundentakt.
Das ist meinen Code, den ich gemacht habe:
Code:procedure TForm1.Button1Click(Sender: TObject); begin repeat Label1.Caption :=IntToStr(x + 1); until x=59; if x=59 then exit; end; end.
Doch sobald ich das dann starte, hängt sich das gemachte auf.
Dann muss ich immer erst auf Pause machen, dann den Code ein wenig umschreiben, dann wieder erstellen damit ich dass dann schließen kann.
Aber warum passiert das?