Activer automatiquement le majuscule à l'entrée d'un champs de saisie

Pour activer le majuscule automatiquement à l'entrée d'un champs de saisie (Sous Windev), procédez comme suit:

1- Créer une procédure (CapsLock par exemple)

// ***********************  Procédure CapsLock  **************************************

 PROCEDURE CapsLock(LOCAL bStatus est un booléen = Faux)

VK_CAPITAL1 est entier = 0x14      // CapsLock
nVK_NUMLOCK est entier = 0x90  // NumLock
nVK_SCROLL est entier = 0x91       // ScrollLock
bEtatInitial est un booléen

nVK_Touche est entier = VK_CAPITAL1

 bEtatInitial = API("USER32","GetKeyState",nVK_Touche)
SI bEtatInitial <> bStatus ALORS
API("USER32","keybd_event",nVK_Touche,0x45,0x1,0)
API("USER32","keybd_event",nVK_Touche,0x45,0x2,0)
FIN

RENVOYER bEtatInitial

// ********************************************************************************


2- Code :  Entrée dans << champs de saisie >>

// Appeler la procédure pour activer le majuscule
CapsLock(Vrai)



Bon dev. GhrSoft

Commentaires

Enregistrer un commentaire

Posts les plus consultés de ce blog

Image
PROCÉDURE  DE CALCUL DE LA CLÉ DE CONTRÔLE - CCP  (N° de compte chèque postal - Algérie) Dans les nouveaux chèques ccp (Jaunes), la clé correspond au N° de RIP. Des fois, vous êtes dans l’obligation de calculer la clé  du N° ccp et non pas le RIP. Cette procédure peut être utile.  Pour tester cette procédure (Sous Windev), il vous faut: Un champs de saisie pour saisir le N° de ccp ( SAI_CCP   - 10 Chiffres) Un champs pour récupérer la clé de contrôle ( SAI_CLE -  2 chiffres) A l'entrée et  sortie du  SAI_CCP  : Suite de la procédure:  A la fin;  Télécharger l'application
Lire la suite

Extension des fichiers créés par WINDEV, WEBDEV, WINDEV Mobile

Image
Extension des fichiers créés par WINDEV, WEBDEV, WINDEV Mobile Quels sont les fichiers créés et gérés par WINDEV, WEBDEV et WINDEV Mobile ? Le tableau ci-dessous présente les principales extensions des fichiers créés et gérés par WINDEV, WEBDEV et WINDEV Mobile. Pour faciliter la lecture, ces extensions sont triées par ordre alphabétique. Extension Description Thème .AWL Fichier généré pour chaque page d'un site dynamique. Correspond à la bibliothèque de la page. Utilisé lors d'un  déploiement page à page . Exécution .AWP Page WEBDEV AWP Exécution .AWWS Bibliothèque contenant toutes les procédures d'un Webservice. Ces procédures seront utilisables par n'importe quelle application utilisant votre Webservice. Pour plus de détails, consultez  Générer un Webservice . Exécution .BKC Fichier archive d'une  classe  (créé à la première sauvegarde de la classe) Archi...
Lire la suite

Ouverture d’un tiroir-caisse

Image
Ouverture d’un tiroir-caisse : Pour un point de vente, le tiroir-caisse est souvent considéré comme une extension de l’imprimante. L’ouverture de celui-ci est donc activée par une commande d’impression. Pour une imprimante TM-T88x (par exemple) : //**************************************************************************************************************************** ImprimanteTicket  est une  chaîne   // nom de l'imprimante ticket derrière laquelle se trouve le tiroir-caisse   iConfigure ( ImprimanteTicket ) //ouverture du tiroir-caisse chTiroir  est une  chaîne chTiroir = ESC + "p0" + ESC + "5" + ESC + "5" iEscape ( chTiroir ) iFinImprime () //**************************************************************************************************************************** Une autre solution : sEcrit ( _port , ESC + "p" + Caract ( 0 )+ Caract ( 25 )+ Caract ( 250 )) //****************...
Lire la suite