Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Formatting an editbox
Message
From
07/02/2001 13:27:35
Elyse Pomerantz
Dynamic Data Concepts, Inc.
Brooklyn, New York, United States
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00473428
Message ID:
00473490
Views:
15
>>Is there an easy way to force the value of an editbox to be uppercase? I just realized that the "!" format option only works for textboxes.
>>
>>Thanks,
>>Elyse
>
>I use the key press event of my edit box class with the code:
>
>
>LPARAMETERS nKeyCode, nShiftAltCtrl
>
>* Because there is a bug with a format of ! in an edit box
>* we will check if the user wishes upper case
>* and run the following fix
>IF '!' $ THIS.FORMAT
>  IF nKeyCode >= 97 AND nKeyCode     NODEFAULT
>    KEYBOARD UPPER(CHR(nKeyCode))
>  ENDIF
>ENDIF
Thanks! This did the trick.
Elyse Pomerantz
Previous
Reply
Map
View

Click here to load this message in the networking platform