bit operations 1

[fishman13]

Does FoxPro have any capabilities to do bit operations. I want to write a method that will control (enable/disable) five command buttons based on one variable.

ex if variable is 3 only push button 1 and 2 is enabled
if variable is 5 only push button 1 and 3 is enabled
if variable is 31 all push buttons are enabled

Thanks for any help

 

[agoeddeke]

I believe you're looking for the BITTEST function. How about:

WITH THISFORM
.cmdButton1.Enabled = BITTEST(variable, 0)
.cmdButton2.Enabled = BITTEST(variable, 1)
.cmdButton3.Enabled = BITTEST(variable, 2)
.cmdButton4.Enabled = BITTEST(variable, 3)
ENDWITH

Andy

 

[jcanon]

Look help files for

BITCLEAR( )
BITLSHIFT( )
BITNOT( )
BITOR( )
BITRSHIFT( )
BITSET( )
BITTEST( )
BITXOR( )

You can use these funtions in bit operations. BitTest let you look for the value of a particular bit