Ich habe vor einiger Zeit einen Code für globale Hotkeys im Netz gefunden und ich hatte bisher noch nie Probleme damit, aber jetzt ist mir aufgefallen, dass es nicht erkennt wenn ich die STRG Taste drücke.
Theoretisch müsste er mir eine MessageBox geben sobald ich den linken Control Key gedrückt habe.
Wäre Super wenn mir jemand helfen könnte
Quellcode
- Public Class frmMain
- Private Declare Function RegisterHotKey Lib "user32" (ByVal hWnd As IntPtr, ByVal id As Integer, ByVal fsModifier As Integer, ByVal vk As Integer) As Integer
- Private Declare Sub UnregisterHotKey Lib "user32" (ByVal hWnd As IntPtr, ByVal id As Integer)
- Private Const Key_NONE As Integer = &H0
- Private Const WM_HOTKEY As Integer = &H312
- Protected Overrides Sub WndProc(ByRef m As Message)
- If m.Msg = WM_HOTKEY Then
- Select Case m.WParam
- Case 1
- MsgBox("strg gedrückt!")
- End Select
- MyBase.WndProc(m)
- End Sub
- Private Sub frmMain_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- RegisterHotKey(Me.Handle, 1, Key_NONE, Keys.LControlKey)
- End Sub
- Private Sub frmMain_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
- UnregisterHotKey(Me.Handle, 1)
- End Sub
Theoretisch müsste er mir eine MessageBox geben sobald ich den linken Control Key gedrückt habe.
Wäre Super wenn mir jemand helfen könnte
