怎样给一个bool类型的变量赋值 ( 积分: 100 )

S

shawy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-13

• #1

怎样给一个bool (longbool)类型的变量flag赋值为01 00 00 00 (16进制)？
我用以下的方法实验不通过：
var
flag:bool
...
flag:=true;
请问有没有其他办法？谢谢

 

S

shawy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-13

• #2

怎样给一个bool (longbool)类型的变量flag赋值为01 00 00 00 (16进制)？
我用以下的方法实验不通过：
var
flag:bool
...
flag:=true;
请问有没有其他办法？谢谢

 

D

dawnsong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-13

• #3

var
flag:BOOL;
begin
Integer(flag) :=1;
ShowMessage(IntToHex(Integer(flag),2));

 

S

shawy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-05-13

• #4

谢谢