L linuxping Unregistered / Unconfirmed GUEST, unregistred user! 2009-03-25 #1 我只知道一个类从TObject继承，不知道具体继承自哪个类。也不确定该类是否有Enabled属性。现在有该类的实例Inst，如果Inst有属性Enabled，则将Enabled属性设为False。如果没有，则不处理。代码如何写？
我只知道一个类从TObject继承，不知道具体继承自哪个类。也不确定该类是否有Enabled属性。现在有该类的实例Inst，如果Inst有属性Enabled，则将Enabled属性设为False。如果没有，则不处理。代码如何写？
Z znxia Unregistered / Unconfirmed GUEST, unregistred user! 2009-03-25 #2 uses TypInfo; if GetPropInfo(Button1, 'Enabled')<>nil then begin Caption:=TypInfo.GetPropValue(Button1, 'Enabled'); SetPropValue(Button1,'Enabled',False); end;请给分。
uses TypInfo; if GetPropInfo(Button1, 'Enabled')<>nil then begin Caption:=TypInfo.GetPropValue(Button1, 'Enabled'); SetPropValue(Button1,'Enabled',False); end;请给分。
