Windows 編程[4] – 學習表單產生的過程四

現在需要複習一下系統與視窗的訊息機制:

一個程式會有一個或多個線程, 系統有一個線程隊列(就是個鏈表)管理所有這些線程, 並為每個線程建立一個訊息佇列.

當訊息產生時(譬如點擊了視窗), 系統會把該訊息放到視窗所在的訊息佇列, 等待視窗處理.

視窗應該時刻待命, 準備從所在的線程隊列中取出訊息並處理!

從訊息佇列中取出訊息, 一般用 GetMessage 函數; 要隨時取出訊息, 需要用個迴圈, 譬如:

while(GetMessage(Msg, 0, 0, 0)) dobegin  ...end;

取出訊息怎麼處理? 用 DispatchMessage 函數將訊息交給(前面提到的)視窗回呼函數, 一般是這樣:

while(GetMessage(Msg, 0, 0, 0)) dobegin  TranslateMessage(Msg); {有些鍵盤訊息需要用 TranslateMessage 函數並發出系統需要的更具體的鍵盤訊息}  DispatchMessage(Msg);end;

如果 GetMessage 函數不返回 0 ; 這個訊息迴圈就是死迴圈, 什麼時候 GetMessage 可以返回 0 呢?

只有當 GetMessage 收到 WM_QUIT 訊息時才返回 0.

我們可在需要的時候, 在回呼函數中通過 PostQuitMessage 函數向線程的訊息佇列中發送一條 WM_QUIT 訊息, 以關閉線程.

PostQuitMessage 函數的參數是給應用程式的退出碼, PostQuitMessage(0) 中的 0 就是我們指定的退出碼, 它將作為 WM_QUIT 訊息的 wParam 參數. 譬如:

function WndProc(wnd: HWND; msg: UINT; wParam: Integer; lParam: Integer): Integer; stdcall;begin  Result := 0;  if msg = WM_DESTROY then    PostQuitMessage(0)  else    Result := DefWindowProc(wnd, msg, wParam, lParam);end;