Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Formatting an editbox
Message
 
To
07/02/2001 11:12:14
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:
00473477
Views:
18
>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
Bret Hobbs

"We'd have been called juvenile delinquents only our neighborhood couldn't afford a sociologist." Bob Hope
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform