Click here to Skip to main content
Rate this: bad
good
Please Sign up or sign in to vote.
See more: VB
Hi!
 
I have a form 'form1' with a textbox 'textbox1'. UseSystemPasswordChar=True because it would be a password field. When I turn on caps lock a warning message appears. I want to disable ONLY this one balloon!
 
I have this code, but it doesn't work! It looks like message number for EM_SHOWBALLOONTIP is not correct, but I can't find the good one.
 
Public Delegate Sub DeActivateEventHandler()
 
Public Class Form1
    Private Const ECM_FIRST As Long = &H1500
    Private Const EM_SHOWBALLOONTIP As Long = (ECM_FIRST + 3)
    Public Event DeActivate As DeActivateEventHandler
 
    Protected Overrides Sub WndProc(ByRef m As Message)
        If m.Msg = EM_SHOWBALLOONTIP Then
            MsgBox("Jump")
            RaiseEvent DeActivate()
        Else
            MyBase.WndProc(m)
        End If
    End Sub
End Class
 
Could you help please?
Posted 20-Dec-09 7:47am
HZ2237
Edited 20-Dec-09 9:40am
v3
Rate this: bad
good
Please Sign up or sign in to vote.

Solution 1

Add the following to the textbox key down event
 
If e.KeyData = Keys.CapsLock Then e.SuppressKeyPress = True
  Permalink  
Rate this: bad
good
Please Sign up or sign in to vote.

Solution 2

This won't work if caps lock is already on before some one clicks on the control which will show the message
  Permalink  

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

  Print Answers RSS
0 OriginalGriff 515
1 Maciej Los 290
2 Richard MacCutchan 265
3 BillWoodruff 235
4 Suraj Sahoo | Coding Passion 175
0 OriginalGriff 8,804
1 Sergey Alexandrovich Kryukov 7,457
2 DamithSL 5,689
3 Maciej Los 5,279
4 Manas Bhardwaj 4,986


Advertise | Privacy | Mobile
Web03 | 2.8.1411028.1 | Last Updated 14 Sep 2012
Copyright © CodeProject, 1999-2014
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100