摘要：写了一个测试代码, 创建一个窗体拉上一个按钮控件,复制以下的代码unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls;typeTForm1=class(TForm)Button1:TButton;procedureButton1Click(Sender:TObject);private{Privatedeclarations}public{Publicdeclarations}end;C1=class//(TPersistent) pr 阅读全文

摘要：TObject简要说明Delphi的对象机制浅探有个意思的学习CreateDelphi 的消息机制浅探VCL窗口函数注册机制研究手记，兼与MFC比较 阅读全文

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