摘要： TObject = class//创建constructor Create;//释放procedure Free;//初始化实列class function InitInstance(Instance: Pointer): TObject;//清除实列procedure CleanupInstance;//获得类的类型function ClassType: TClass;//获得了的名称class... 阅读全文