delphi的tobject類賞析
tobject = class
//建立
constructor create;
//釋放
procedure free;
//初始化實列
class function initinstance(instance: pointer): tobject;
//清除實列
procedure cleanupinstance;
//獲得類的型別
function classtype: tclass;
//獲得了的名稱
class function classname: shortstring;
//判斷類的名稱
class function classnameis(const name: string): boolean;
//類的父類
class function classparent: tclass;
//類的資訊指標
class function classinfo: pointer;
//當前類的實列大小
class function instancesize: longint;
//判斷是否從乙個類繼承下來
class function inheritsfrom(aclass: tclass): boolean;
//根據方法的名稱獲得方法的位址
class function methodaddress(const name: shortstring): pointer;
//根據位址或的方法的名稱
class function methodname(address: pointer): shortstring;
//根據名稱獲得屬性的位址
function fieldaddress(const name: shortstring): pointer;
//查詢介面
function getinte***ce(const iid: tguid; out obj): boolean;
//獲得介面的入口
class function getinte***ceentry(const iid: tguid): pinte***ceentry;
//獲得介面表
class function getinte***cetable: pinte***cetable;
//安全呼叫例外
function safecallexception(exceptobject: tobject;
exceptaddr: pointer): hresult; virtual;
//建立之後的執行
procedure afterconstruction; virtual;
//釋放之前的執行
procedure beforedestruction; virtual;
//分派訊息
procedure dispatch(var message); virtual;
//預設的控制代碼
procedure defaulthandler(var message); virtual;
//新的實列
class function newinstance: tobject; virtual;
//釋放實列
procedure freeinstance; virtual;
//釋放
destructor destroy; virtual;
end;
Delphi 類的類 class of 用法
這個概念本來在乙個關於delphi rtti 介紹的文件中已經說得很清楚了。但沒有任何關於實際使用的介紹,在我明白了這個概念和如何使用後決定寫乙個使用說明以方便大家使用。類的類在什麼時候使用 知道父類但需要建立具體的子類時 你不知道子類會是什麼 例如 關鍵 tcomponentclass class...
Delphi中的執行緒類(2)
首先就是建構函式 constructor tthread.create createsuspended boolean begin inherited create addthread fsuspended createsuspended fcreatesuspended createsuspend...
理解 Delphi 的類 二 初識類的方法
說到 類 就會提到 屬性 方法 事件 這是類包含的內容 封裝 繼承 多型 這是類的主要用途 下面定義並呼叫了了乙個過程 myproc 乙個函式 myfun.unit unit1 inte ce uses windows,messages,sysutils,variants,classes,graph...