回調函數與Delphi的事件模型

 

回調函數：

回調函數是這樣一種機制：調用者在初始化一個對象（這里的對象是泛指，包括OOP中的對象、全局函數等）時，將一些參數傳遞給對象，同時將一個調用者可以訪問的函數地址傳遞給該對象。這個函數就是調用者和被調用者之間的一種通知約定，當約定的事件發生時，被調用者（一般會包含一個工作線程）就會按照回調函數地址調用該函數。

這種方式，調用者在一個線程，被調用者在另一個線程。

在Windows API中有一些函數使用回調函數，例如CreateThread、SetWindowLong等。對應的回調函數定義為如下形式：

function CallBackFunc(Wnd: HWND; Msg, WParam, LParam: Longint): Longint;stdcall;

PRocedure ThreadFunction(Ptr: Pointer);stdcall;

 

消息：

消息也可以看作是某種形式的回調，因為消息也是在初始化時由調用者向被調用者傳遞一個句柄和一個消息編號，在約定的事件發生時被調用者向調用者發送消息。

這種方式，調用者在主線程中，被調用者在主線程或者工作線程中。

 

Delphi事件模型：

在Delphi的VCL中有很多可視化組件都是使用事件模型，例如TForm的OnCreate事件，其原理是：在設計時指定事件函數，在運行時事件觸發，則會調用在設計時指定的事件函數。

在機制上，Delphi事件模型與回調是一樣的。但具體形式有些區別，純的回調函數是全局函數的形式，而Delphi事件是對象方法的形式，即可以定義如下回調函數類型

type

TCallBackFunc = procedure (pData: Pointer) of object;

這就使得Delphi事件只能在Delphi內部使用，而回調函數是可以跨語言的。

 

另外還要注意，回調函數一般（在Delphi的組件是在主線程中）是在回調體中創建的線程，因此要有臨界區保護。