怎么用RTTI对控件的子类属性进行赋值

如何用RTTI对控件的子类属性进行赋值?比如StatusBar,有个子类对象TStatusPanels,这个子类对象中有个TEXT属

如何用RTTI对控件的子类属性进行赋值?
比如StatusBar,有个子类对象TStatusPanels,这个子类对象中有个TEXT属性,我现在想利用RTTI机制,动态设置其TEXT的值

就是利用SetEnumProp方法来设置,问题是,如何得到子类对象的指针呢?(System::TObject* Instance)

最好给出测试的代码!

[解决办法]
貌似妖哥这段时间没在