Das was du da machst ist ja im Grunde nichts anderes als die Darstellung Binärer Werte als Integer.
Zitat:
Opt.
1=2
2=4
3=8
4=16
binär fängt das ganze nur bei 0 statt bei eins an.
also
Bit 0 = 1
Bit 1 = 2 etc...
Wenn du jetzt deine 10 hast und Prüfen willst ob Bit 3 ( mit der Wertigkeit 8 ) gesetzt ist, brauchste nur 10 AND 8 machen.
also z.B.
Delphi-Quellcode:
var Bit1, Bit3 = Boolean
Begin
Bit1 := 10 AND 2 = 2;
Bit3 := 10 AND 8 = 8;
...
End;
Wenns wirklich nur die paar Werte sind, kannste das hardcodet machen. Wenns mehr werden solltest du dir ne Funktion schreiben, die das ganze durchparst. Bestimmt gibts sowas hier auch schon irgendwo.