拦截单个消息可以这样处理:<br>//拦截鼠标右键单击<br>procedure TWMRBUTTONDOWN(var msg:TMsg); message WM_RBUTTONDOWN;<br>procedure Tform1.TWMRBUTTONDOWN(var msg:TMsg);<br>begin<br> //加入自己的代码<br>end;<br>拦截多个进行处理,可以通过SetWindowLong或者MakeObjectInstance子类化,也可以覆盖WndProc<br>正如楼上所说,看看<<DELPHI 5开发人员指南>>吧,里面有很详细的介绍