Schon wieder Arrays... Werte abwechselnd ändern?

[xineohp]

1. jeder Button darf nur einmal gedrückt werden --> Im OnClick-Ereignis: ButtonX.enabeld := false;
2. fest stellen welcher Spieler an der Reihe ist bzw. welche Zahl eingetragen werden soll
--> eine globale Variable einführen die speichert welcher Spieler zu letzt gesetzt hat
--> Im OnClick-Ereignis:

Delphi-Quellcode:

case LastPlayer of
  0: LastPlayer := 1;  // noch kein Button gedrückt, also kommt Spieler 1 drann
  1: LastPlayer := 2;  // Spieler 1 war drann, also muss jetzt Spieler 2 rann
  2: LastPlayer := 1;  // Spieler 2 war drann, also muss jetzt Spieler 1 rann
end;

3. Wert in das array eintragen --> Im OnClick-Ereignis: array[X,Y] := LastPlayer