Zitat:
Delphi-Quellcode:
case RadioGroup1.ItemIndex of
0: begin
label2.caption:= '+';
REPEAT
if radiogroup2.ItemIndex=0 then
begin
n := random(100) +1; m:= random(100) +1;
end;
UNTIL m+n <=100;
Was passiert denn dann in z.B. folgender Konstellation: RadioGroup1.ItemIndex = 0, RadioGroup2.ItemIndex = 1, m = 100 und n = 100? Die Schleife wird immer wieder durchlaufen, m und n aber nicht verändert, da der ItemIndex der 2. Radiogroup ja nicht stimmt.
[edit] Sry, Willkommen in der
DP 
[/edit]