Mehrere Variablen vergleichen

[Hawkeye219]

Hallo,

laut Eröffnungsbeitrag handelt es sich um lediglich 9 Werte, vermutlich sogar mit einem stark eingeschränkten Wertebereich von 1..9. Falls diese Vermutung stimmt, dann lässt sich das Problem relativ leicht lösen:

Delphi-Quellcode:

if ([a, b, c, d, e, f, g, h, i] = [1..9]) then
  ShowMessage ('alle Werte unterschiedlich')
else
  ShowMessage ('mindestens ein Wert fehlt bzw. doppelt');

Gruß Hawkeye

[daywalker9]

Das funktioniert nur wenn die Werte in der Variablen a = 1 und i = 9 ist. Ansonsten klappt das nicht. Das heißt es muss sortiert werden, was wieder für ein Array spricht und dies dann mit for Schleifen durchzulaufen

[Namenloser]

Zitat von daywalker9:

Das funktioniert nur wenn die Werte in der Variablen a = 1 und i = 9 ist.

Bei einem Set soltle die Reihenfolge eigentlich keine Rolle spielen, schließlich ist ein Set letztlich nichts anderes als eine Bitmaske. In welcher Reihenfolge diese Bits gesetzt werden, macht keinen Unterschied.

[daywalker9]

Stimmt, ich revidiere meine Aussage

[Delphi-Narr]

Also es sind wirklich nur die Werte 1-9. Es ist, um ein Sudoku zu überprüfen.
Daher speicher ich immer eine Reihe/Spalte oder einen Block in einem Array [0..8] und prüfe, ob alle Werte stimmen...
Daher wäre das mit dem Set auch eine Möglichkeit, die mir entgangen ist...