Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Formatting an editbox
Message
De
07/02/2001 13:27:35
Elyse Pomerantz
Dynamic Data Concepts, Inc.
Brooklyn, New York, États-Unis
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00473428
Message ID:
00473490
Vues:
16
>>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
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform