Delphi捕获消息的例子，捕获和屏蔽消息于OnMessage、WndProc、Message Procedure、Default Handler；在应用程序层处处理消息，重载WndProc方法，在窗口过程处处理消息，重载缺省的消息处理过程，提示一下：消息发送方法的数组，SendPostString[0]是 Send消息, SendPostString[1]是Post消息，在程序中是以判断消息结构的 　　 wParam字段来得到索引值的。SendMessage 时将wParam置为0， PostMessage 时将wParam置为1。