Skip to main content

Control Hotkeys

Image Credits VNAMedia

This weekend I plan to learn coding hotkeys and sending them to Winforms, basically for fun. I was testing the Control + N hotkeys and came up with some really useful text book material. This particular code was made to test things and worked great. I was happy and posted it here to ease the work for you.

Public Const MOD_CTRL As Integer = &H2 'Control key
    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_CTRL, Keys.N)
        'RegisterHotKey(Me.Handle, 200, MOD_CTRL, Keys.C)
    End Sub

    Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
        If m.Msg = WM_HOTKEY Then
            Dim id As IntPtr = m.WParam
            Select Case (id.ToString)
                Case "100"
                    MessageBox.Show("You pressed CTRL+N key combination")
                    '  Case "200"
                    'MessageBox.Show("You pressed ALT+C key combination")
            End Select
        End If
        MyBase.WndProc(m)
    End Sub

You should also check out these sites to know about more details.

http://www.xtremevbtalk.com/showthread.php?t=185548

http://social.msdn.microsoft.com/Forums/pl-PL/vblanguage/thread/3cc4da38-7846-4277-8dae-ef8fe4e66dc8

http://social.msdn.microsoft.com/Forums/en-US/vbgeneral/thread/c1a24688-d844-4adc-9d85-416a7158c6ba/

http://www.eggheadcafe.com/searchform.aspx?search=WM_SYSKEYDOWN

http://www.kirsbo.com/2010/how-to-add-global-hotkeys-to-applications-in-vb-net/

Comments

Popular posts from this blog

My love affair with ThinkPads

I had never used a ThinkPad in my life till 2018. To be honest, I did not really see the benefit of using them anyway. Consumer series laptops (with plastic bodies) were the ones that I had always used before. Then I was introduced to the rugged looks of the T60 and T61 original IBM ThinkPad designs that came out way back in 2004 or so. And I loved it. Finding a ThinkPad that old did not appeal to me. I was impressed with the smaller compact X series laptops and decided to have either an X230 or an X220. Both of these are fairly similar and were launched about 8 years back. But they still sport good processors, plenty of memory upgradability, provision to add a maximum of three hard disks and a decent battery backup to boot. My reasons to get this were simpler -  They are rugged, I like to use my laptops well Memory is not soldered. There are plenty of options to upgrade. The keyboards are probably the best in the world. Why not get the latest ThinkPad? Again, simple.  They come with a

How To: Change Fonts On The 5800, 5233 etc

The font that comes with Nokia is nice. But after six months you are bound to crave for a new look to your phone. Now changing fonts on a phone is usually not an easy task, I mean that was how you must have thought. But you know what you can use custom fonts, yes any font of your choice on your Nokia phone without any software. All you need to do is copy and paste a bunch of files. No replacing of system resources necessary! First to increase your greed, I will post some screenshots, Screenshot Gallery o   Font Style Download o Another Font Style Now let me tell you how I did it. Procedure to apply new Fonts Connect the phone in the ‘Mass Storage’ profile to the computer. Alternatively, you can use the memory card reader. Goto the Memory Card, it shows up as a Removable Disk. Navigate to the ‘resource’ folder and open it. Copy the ‘Fonts’ folder into in. Eject the device and restart. You should see the new fonts applied. Procedure to apply your Fonts Ma

The Crow from Pakistan

Crows are black in color. They look pretty alike don't they? Unless of course there is some distinguishing mark in them like, a damaged beak, or a blind eye or something like that. Surprisingly the crow I am talking about looks pretty Indian. The same beak, the same black feathers, similar prejudices, same habits, same way of living. He had just flown across Lahore over the fence by South of Wagah to the wheatfields to the south west of Amritsar. The tresspassing crow was hungry and had started feeding on Indian wheat. I wonder where he will defecate. Was Pakistani crow shit considered bombing when the food is Indian? I didn't know. I pressed my binoculars close to my eyes and wait but my hands are aching. So I took out my tripod, keep the tea plate on top of it and rested my hands on it. Then I again held my binoculars and focused the crow. The crow was dutifully eating the wheat grains as if that was the only thing he was born for this purpose only. This continued for around