DelphiPostSend发送和屏蔽消息，//在应用程序层处处理消息 　　procedureOnAppmessage(varmsg:TMsg;varhandled:boolean); 　　//重载WndProc方法，在窗口过程处处理消息 　　procedureWndProc(varmsg:TMessage);override; 　　//自定义的消息处理过程 　　procedureMyMessage(varmsg:TMessage);messageWM_MYMSG; 　　//重载缺省的消息处理过程 　　procedureDefaultHandler(varmsg);o