Delphi-Quellcode:
type
TForm1 = class
private
Rundenzahl: Integer;
end;
procedure ButtonWürfelnClick(Sender: TObject);
begin
if Rundenzahl > 0 then begin
Rundenzahl := Rundenzahl - 1;
DoSpielen;
end;
end;
Ich schätze mal eher, dass Hoika es so gemeint hat. Irgendwann vor dem Ersten Klicken auf "Würfeln" musst du eine Rundenzahl größer als Null eingeben, dann wird mit jedem Klick auf "Würfeln" einmal gespielt, solange bis der Rundenzähler auf Null steht.
Was ist der Unterschied zwischen der Zähler- und der Schleifenvariante?
Bei der Schleifenvariante muss man den Button "Würfeln" einmal Klicken, dann wird sooft gespielt, wie in Rundenzahl festgelegt. Bei der Zählervariante muss man jedes Spiel mit dem Button "Würfeln" beginnen.