Du kannst die möglichen Zahlen in einem Sudoku-Feld als Array deklarieren:
Delphi-Quellcode:
type
TErlaubteZahlen = {packed} array[1..9] of Boolean;
Wenn du Speicher sparen möchtest, dann kannst du das Schlüsselwort
packed benützen.
Es gäbe auch die Möglichkeit du erlaubten Zahlen bitcodiert in einem Integer oder Short unterzubringen
oder die Klasse TBits zu benützen.
Das Boolean-Array ist aber die einfachste Möglichkeit.
Man kann den Anfangszustand (alle Zahlen von 1 bis 9 erlaubt) so herstellen:
Delphi-Quellcode:
const
AlleErlaubtenZahlen: TErlaubteZahlen= (True,True,True,True,True,True,True,True,True);
...
ErlaubteZahlen := AlleErlaubtenZahlen;
Man erspart sich dadurch eine Schleife von 1 bis 9, die die Werte im Array auf True setzt.