用ImessageFilter截获键盘消息

王朝other·作者佚名  2008-05-19
窄屏简体版  字體: |||超大  

IMessageFilter 接口

IMessageFilter 接口允许应用程序在消息被调度到控件或窗体之前捕获它。

可以将实现 IMessageFilter 接口的类添加到应用程序的消息泵中,以在消息被调度到控件或窗体之前将

它筛选出来或执行其他操作。若要将消息筛选器添加到应用程序的消息泵中,请使用 Application 类中的

AddMessageFilter 方法。

Application.AddMessageFilter 方法

添加消息筛选器以便在向目标传送 Windows 消息时监视这些消息。

[Visual Basic]

Public Shared Sub AddMessageFilter( ByVal value As IMessageFilter )

参数

value

您要安装的 IMessageFilter 接口的实现。

备注

使用消息筛选器来防止引发特定事件,或在将某事件传递给事件处理程序之前使用消息筛选器对其执行特

殊操作。消息筛选器对特定线程是唯一的。

若要防止调度某消息,传递给该方法的 value 参数实例必须用处理该消息的代码重写 PreFilterMessage 方法

。该方法必须返回 false。

警告 向应用程序的消息泵添加消息筛选器会降低性能。

示例

[Visual Basic, C#, C++] 必须先提供 IMessageFilter 接口的一个实现,然后才可以使用消息筛选器。

下面的类创建一个名为 TestMessageFilter 的消息筛选器。此筛选器阻止与鼠标左键有关的所有消息。

[Visual Basic]

' Creates a message filter.

Public Class TestMessageFilter

Implements IMessageFilter

Public Function PreFilterMessage(ByRef m As System.Windows.Forms.Message) _

As Boolean Implements IMessageFilter.PreFilterMessage

' Blocks all the messages relating to the left mouse button.

If ((m.Msg >= 513) And (m.Msg <= 515)) Then

Console.WriteLine("Processing the messages : " & m.Msg)

Return True

End If

Return False

End Function

End Class

用Esc键退出程序

Implements IMessageFilter

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles

MyBase.Load

'assign message to app and form

Application.AddMessageFilter(Me)

End Sub

Public Function PreFilterMessage(ByRef m As System.Windows.Forms.Message) As Boolean

Implements IMessageFilter.PreFilterMessage

Dim keyCode As Keys = CType(m.WParam.ToInt32(), Keys) And Keys.KeyCode

If keyCode = Keys.Escape Then

End

'结束程序。我们在此可以调用各种方法、过程。

End If

End Function

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
© 2005- 王朝網路 版權所有 導航