Force Case on Text Input

Category: Controls - Edit Controls

Date: 03-28-2012

Return to Index


 
'Edit controls have the built-in ability to force lower, upper, or password
'case on text as it is entered. style& values are used to produce the result.
 
'Primary Code:
Control Add TextBox, hDlg, id&, "TextBox", 100,100, 80,20, %ES_LOWERCASE
Control Add TextBox, hDlg, id&, "TextBox", 100,100, 80,20, %ES_UPPERCASE
Control Add TextBox, hDlg, id&, "TextBox", 100,100, 80,20, %ES_PASSWORD   'forces asterisk display
 
 
'Compilable Example:
#Compiler PBWin 9, PBWin 10
#Compile EXE
#Dim All
Global hDlg As Dword
 
Function PBMain() As Long
   Dialog New Pixels, 0, "Test Code",300,300,200,200, %WS_OverlappedWindow To hDlg
   Control Add TextBox, hDlg, 100,"Lower", 20,10,100,20, %ES_Lowercase Or %WS_TabStop
   Control Add TextBox, hDlg, 200,"Upper", 20,40,100,20, %ES_Uppercase Or %WS_TabStop
   Control Add TextBox, hDlg, 300,"Psw", 20,70,100,20, %ES_Password Or %WS_TabStop
   Dialog Show Modal hDlg
End Function
 
'gbs_00132
'Date: 03-10-2012


created by gbSnippets
http://www.garybeene.com/sw/gbsnippets.htm