Kleines Problem mit Grundlagen // Minigame

[hans ditter]

du musst einfach abfragen, ob die Checkbox unter deiner Zahl angeklickt ist oder nicht. In etwa so:

Delphi-Quellcode:

if NOT(Checkbox1.Checked) then
  Panel1.Caption := random(6) + 1;
if NOT(Checkbox2.Checked) then
  Panel2.Caption := random(6) + 1;

Wenn du dann nur dreimal Würfeln erlauben willst, dann kannst du vorher noch eine if-Abfrage einbauen, die den Zustand einer Zählvariable prüft:

Delphi-Quellcode:

var WurfCount: Integer;

begin
  if WurfCount < 3 then
  begin
    //hier die Zufallszahlen
    Inc(WurfCount);
  end
  else
  begin
    WurfCount := 0;
    Break;
  end;
end;

Wenn dann schon dreimal gewürfelt wurde, wird die Prozedur/Funktion abgebrochen, sonst eben nicht.

LG; hans ditter

[p80286]

Zitat von shmia:

Hmm, man kann es richtig machen oder falsch.
Richtig wäre: das Array mit den 6 Zahlen ist "der Chef" und die Panels sind nur die Anzeige.
Ich mein' das kann doch nicht so schwer zu verstehen sein.
Falsch wäre, den Paneln die zufälligen Zahlen zuzuweisen und dann später wieder von dort auszulesen.

Hier nochmal das Kochbuch:
1.) array mit 6 zufälligen Zahlen befüllen
2.) die Werte in dem array auf die Panels kopieren (Visualisierung)
3.) arrays auswerten und schauen wieviele DreierPasch enthalten sind
4.) Prüfen ob eine Strasse in dem Array steckt
5.) Punktezahl errechnen und anzeigen

Recht hast Du!
Aber ich kann shillok gut verstehen, da "Programmieren" sich heute oft mit der Darstellung von irgendetwas und nicht mit der Verarbeitung von irgendetwas beschäftigt.


Gruß
K-H