2013-01-05 38 views
2

你好我想在VB.NET中使用RegisterHeyKeys,但我得到它与2热键工作我试图只是在第三个添加,它提供了太多的参数。这可能是一件非常简单的事情,我也非常容易。大声笑。任何帮助将不胜感激。注册3个热键?可能?

这是迄今为止代码:

Public Const MOD_CONTROL As Integer = &H11 
Public Const MOD_SHIFT As Integer = &H10 
Public Const WM_HOTKEY As Integer = &H312 

<DllImport("User32.dll")> _ 
Public Shared Function RegisterHotKey(ByVal hwnd As IntPtr, _ 
ByVal id As Integer, ByVal fsModifiers As Integer, _ 
ByVal vk As Integer) As Integer 
End Function 

<DllImport("User32.dll")> _ 
Public Shared Function UnregisterHotKey(ByVal hwnd As IntPtr, _ 
        ByVal id As Integer) As Integer 
End Function 

Private Sub Form1_Load(ByVal sender As System.Object, _ 
        ByVal e As System.EventArgs) Handles MyBase.Load 
    RegisterHotKey(Me.Handle, 100, MOD_CONTROL, MOD_SHIFT, Keys.D2) 
    RegisterHotKey(Me.Handle, 200, MOD_CONTROL, MOD_SHIFT, Keys.D3) 
    RegisterHotKey(Me.Handle, 300, MOD_CONTROL, MOD_SHIFT, Keys.D4) 
End Sub 

回答

6

的问题,因为我看到的是你已经添加了两个修饰语MOD_CONTROLMOD_SHIFT并用逗号说,你有五个参数的功能,即使分隔它们它只需要四个。像这样一起尝试Oring你的Modifers。您还应该使用他们似乎不正确的文档来验证您的修改键。

Private Sub Form1_Load(ByVal sender As System.Object, _ 
        ByVal e As System.EventArgs) Handles MyBase.Load 
    RegisterHotKey(Me.Handle, 100, MOD_CONTROL Or MOD_SHIFT, Keys.D2) 
    RegisterHotKey(Me.Handle, 200, MOD_CONTROL Or MOD_SHIFT, Keys.D3) 
    RegisterHotKey(Me.Handle, 300, MOD_CONTROL Or MOD_SHIFT, Keys.D4) 
End Sub 

documentation它规定(重点煤矿):

fsModifiers [IN]
类型:UINT

必须在组合与由指定的键被按压的按键uVirtKey参数以便生成WM_HOTKEY消息。 fsModifiers参数可以是以下值的组合

Value      Meaning 

MOD_ALT 0x0001   Either ALT key must be held down. 

MOD_CONTROL 0x0002  Either CTRL key must be held down. 

MOD_NOREPEAT 0x4000 Changes the hotkey behavior so that the keyboard auto-repeat does not yield multiple hotkey notifications. 
         Windows Vista and Windows XP/2000: This flag is not supported. 
MOD_SHIFT 0x0004  Either SHIFT key must be held down. 

MOD_WIN 0x0008  Either WINDOWS key was held down. These keys are labeled with the Windows logo. Keyboard shortcuts 
         that involve the WINDOWS key are reserved for use by the operating system 

这里是你的程序的工作示例。

Public Const MOD_CONTROL As Integer = &H2 
Public Const MOD_SHIFT As Integer = &H4 
Public Const WM_HOTKEY As Integer = &H312 

<DllImport("User32.dll")> _ 
Public Shared Function RegisterHotKey(ByVal hwnd As IntPtr, _ 
             ByVal id As Integer, ByVal fsModifiers As Integer, _ 
             ByVal vk As Integer) As Integer 
End Function 

<DllImport("User32.dll")> _ 
Public Shared Function UnregisterHotKey(ByVal hwnd As IntPtr, _ 
       ByVal id As Integer) As Integer 
End Function 

Private Sub Form1_Load(ByVal sender As System.Object, _ 
        ByVal e As System.EventArgs) Handles MyBase.Load 
    RegisterHotKey(Me.Handle, 100, MOD_CONTROL Or MOD_SHIFT, Keys.D2) 
    RegisterHotKey(Me.Handle, 200, MOD_CONTROL Or MOD_SHIFT, Keys.D3) 
    RegisterHotKey(Me.Handle, 300, MOD_CONTROL Or MOD_SHIFT, Keys.D4) 
End Sub 

Protected Overrides Sub DefWndProc(ByRef m As System.Windows.Forms.Message) 
    MyBase.DefWndProc(m) 
    If m.Msg = WM_HOTKEY Then 
     Select Case CType(m.WParam, Integer) 
      Case 100 
       NotifyIcon1.Text = "Hello" 
       NotifyIcon1.ShowBalloonTip(2000, "", NotifyIcon1.Text, ToolTipIcon.Info) 
      Case 200 
       NotifyIcon1.Text = "World" 
       NotifyIcon1.ShowBalloonTip(2000, "", NotifyIcon1.Text, ToolTipIcon.Info) 
      Case 300 
       NotifyIcon1.Visible = False 
       If Not Visible Then Visible = True 
     End Select 
    End If 
End Sub 

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click 
    Me.Hide() 
    NotifyIcon1.Icon = Me.Icon 
    NotifyIcon1.Visible = True 
End Sub 
+0

我不知道我是否知道你的修饰符是什么意思。我知道你的意思是错误的价值。但是,对于这些的正确价值是什么?我不明白。对不起,noob问题。 :P –

+0

修饰符是MOD_CONTROL和MOD_SHIFT。我在答案中包含了文档,将它们视为我使用微软命名法的控制键。正确的值应该是:'MOD_CONTROL' =&H2和'MOD_SHIFT' =&H4 –

+0

@JJR。我刚刚添加了我曾经用 –