回調(diào)函數(shù)與Delphi的事件模型

 

回調(diào)函數(shù)：

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

這種方式，調(diào)用者在一個線程，被調(diào)用者在另一個線程。

在Windows API中有一些函數(shù)使用回調(diào)函數(shù)，例如CreateThread、SetWindowLong等。對應(yīng)的回調(diào)函數(shù)定義為如下形式：

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

PRocedure ThreadFunction(Ptr: Pointer);stdcall;

 

消息：

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

這種方式，調(diào)用者在主線程中，被調(diào)用者在主線程或者工作線程中。

 

Delphi事件模型：

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

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

type

TCallBackFunc = procedure (pData: Pointer) of object;

這就使得Delphi事件只能在Delphi內(nèi)部使用，而回調(diào)函數(shù)是可以跨語言的。

 

另外還要注意，回調(diào)函數(shù)一般（在Delphi的組件是在主線程中）是在回調(diào)體中創(chuàng)建的線程，因此要有臨界區(qū)保護。