[*]Profan

Deutsch

Michael
W.

Ich wünsche mir, daß auch SetBit und TestBit mit Quad klarkommen - das wären dann 64 Bits (von 0 .. 63).

Derzeit sind dort nur 32 Bits möglich.

Zwar kann ich eine Quad angeben, aber es werden halt nur 32 Bits bearbeitet, alles höhere bleibt auf Null (oder was vorher drin stand).
Kompilieren Markieren Separieren

Cls
Declare Quad Test
Clear Test
Test = SetBit(Test,32,1)
Print "Test Bit.32:", TestBit(Test,32)
Clear Test
Test = SetBit(Test,31,1)
Print "Test Bit.31:", TestBit(Test,31)
WaitKey
End

In der Hilfe steht übrigens, das TestBit den Wert des Bits ergibt. Das sehe ich ein wenig anders. In einem Bitfeld ist der Wert des Bits nicht nur 0 oder 1.

System: Windows 8/10, XProfan X4
Programmieren, das spannendste Detektivspiel der Welt.

20.01.2015 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

RGH

Danke für den Hinwewis. Da hatte ich doch tatsächlich versäumt, beim Ergebnis von SetBit den Parametertyp von Long auf Quad zu setzen.

Ab der nächsten Subscriptionsversion (noch diese Woche) klappt es dann wie gewünscht!

Gruß
Roland

Ach ja: Und in der Hilfe sollte man dann eher vom Zustand des Bits schreiben ...

Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4

20.01.2015 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren