首页 > TAG信息列表 > TYourClass

Delphi 通过类名称(字符串)创建类实例

通过类名称(字符串)创建类实例 首先要在 initialization 区域注册要创建的类 RegisterClass(TYourClass); 然后在运行期使用如下代码创建 TYourClass 类的实例。 procedure Txxx.xxxx;varcls: TPersistentClass;ys: TYourClass;begincls := GetClass('TForm2');ys := TYourClass(cl