Enumval in Delphi darstellen

[chaosben]

Du solltest mit den AND-Befehl zum Ziel kommen.

Hier mal ein wenig Theorie:
Du hast ein 8-Bit-Zahl (aka Byte ) 123 und du willst testen, ob das 6. Bit (=2^5=32) gesetzt ist. Da ergibt sich folgende Darstellung

Code:

____1111011B
AND 0010000B
------------
=   0010000B

In Delphi würde das Ganze so aussehen:

Delphi-Quellcode:

Zahl:=123;
TestZahl:=32;
if (Zahl and Testzahl)=Testzahl then
  //Oleee

Auf diese Weise kannst du testen, ob ein Flag gesetzt ist oder nicht

//btw: Beim Schreiben ist mir aufgefallen, das in der Delphi-Hilfe ein Beispiel dafür drin ist, dort aber die Bedingung anders lautet: if (Zahl and Testzahl)=Zahl .... Irgendwie bin ich nun ein wenig verwirrt. Aber das was ich oben geschrieben habe, ist das was ich in der Ausbildung gelernt habe.