Leider unterstüzt Delphi nicht direkt einen Wert auf mehrere Werte zu überprüfen.
Einzige Ausnahme ist case, aber das steht nicht zur debatte.
Ansonsten gibts hier ein Tutorial zu Binäroperationen (oder so xD).
Als würde
117 AND -1 einen ganz neuen Wert liefern. Dieser wird mit "sel" getestet:
Beispiel:
4 = (4 AND 2)
Binär:
Zitat:
4 and 2 =>
100 and 010 =>
110 => 6
Ergebnis ist, dass 4 = 6 falsch ist.
Binär mit or:
Zitat:
4 or 2 =>
100 or 010 =>
110 => 6 (okay schlechtes Beispiel)
MfG
xZise
[redbox]
117 and -1 = 117?
Das würde ich bezweifeln:
Wir erstellen einen 4bitter mit Vorzeichen:
Zitat:
0000 = 0
1. Bit = Vorzeichen
2. - 4. Bit = Zahl
Also machen wir mal
(7 and -1):
Zitat:
0111 = 7
1001 = -1
1111 = -7 => Ergebnis ist nicht 7
[/redbox]