Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.033 Beiträge
 
Delphi 12 Athens
 
#4

Re: Prüfen ob Bitposition gesetzt

  Alt 7. Mär 2005, 14:46
Zitat von MatthiasW:
Wie kann ich prüfen ob eine Bitposition gesetzt ist?

Also bei "1011" ob an der ersten und letzten stelle eine 1 steht?
Bei deinem Problem ist es also ganz einfach.
Delphi-Quellcode:
BitIstGesetzt := X and 1 <> 0;

If X and 1 <> 0 Then ...
X ist irgendein Integer-Typ (Integer, Byte, Word ... siehe Delphi-Referenz durchsuchenInteger-Typen),
BitIstGesetzt ist demnach Boolean
und die 1 steht für ...000001 (Binär).

Also
Code:
1011 and 0001 = 0001     // Ergebnis <> 0 dann ist Bit gesetzt
1010 and 0001 = 0000     // Ergebnis = 0 dann ist nicht gesetzt
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat