Delphi XE增强的RTTI妙用--动态创建包中的窗口类
以前要在运行时创建package中的form类,必须要在form单元文件中这样注册类:Initialization RegisterClass(TForm3);Finalization UnRegisterClass(TForm3);然后在调用模块中,通过FindClass或GetClass函数返回一个TPersistentClass,再通过此类引用创建窗口类: AClass := GetClass(ClassName); aForm := TCustomForm(AClass.Create).Cr
原创
2011-02-05 13:45:00 ·
4247 阅读 ·
1 评论