diff options
-rw-r--r-- | raetselunit.pas | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/raetselunit.pas b/raetselunit.pas index 121a9ea..b78b37b 100644 --- a/raetselunit.pas +++ b/raetselunit.pas @@ -345,8 +345,9 @@ begin if assigned(onSetCaption) then onSetCaption(intToStr(zufallSE.value)); zufallSE.value:=random(zufallSE.maxValue+1); - vorbereiten; - loesen(-1); + repeat + vorbereiten; + until loesen(-1); randErzeugen; leeren; startFelderFestlegen; |