如何利用RTTI对组件的布尔型属性进行赋值，救命啊

Question

用SetOrdProp??
TTypeKind中没定义布尔型啊请教大家丫！

Answer 1

布尔型用LongInt赋值；uses TypInfo;例子：
var
  Value: Longint;
begin
 ...
 Value := LongInt(CheckBox1.Checked);
 SetOrdProp(Component, PropInfo, Value);
 ...
end;

Answer 2

不是这样的
用任何整数类型都可以对布尔型赋值
其实布尔型是枚举型
在TTypeKind中有枚举型的啊

Answer 3

布尔型分为：
 1字节布尔型  Boolean, ByteBool
 2字节布尔型  WordBool
 4字节布尔型  Bool, LongBool所以用Longint给布尔型是最安全的

Answer 4

var
vpropertyname,VpropertyValue:string;
begin
.....
          if HasProperty(sender,vpropertyname) then
            SetPropvalue(sender,vpropertyname,VpropertyValue);

Answer 5

StaticFields(静电场)说的是正确的