GHRSOFT & WINDEV

Code source pour réaliser un tour de magie avec Windev (Mathématique) -        Ce code est personnel et gratuit  (GhrSoft ) - La distribution est  libre de droit. Le principe : L’utilisateur de l'application pense à un chiffre entre 1 et 30 (pour simplifier l’exemple), et répond aux questions relatives à l’existence, du chiffre choisi, dans le tableau correspondant. A la fin, comme par magie, l’application détecte automatiquement le chiffre choisi.     Les tableaux Il y a plusieurs méthodes pour réaliser ce petit programme, et chacun sa méthode. Ci-dessus une solution:        Les champs :         La fenêtre comporte 7 plans         Plan 1 :  Acceuil    -   Plan 2 :  Tab 1 ........... Plan 7:  Résultat         5 sélecteurs ( SEL_01, 02, 03, 04 et SEL_05)   ...

Versions Framework .NET ? Pour récupérer la liste des versions installées de Framework .NET il suffit de suivre les étapes suivantes: Ajouter un champs LISTE dans une fenêtre ( Dans cet exemple  LISTE_DOTNET ) Ajouter un champs Bouton                             ( Dans cet exemple  BTN_Afficher) Saisir le code suivant dans:    Clic sur << ِ BTN_Afficher  >>         OU dans la fin l'initialisation de la fenêtre (Affichage direct)

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édu...

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 )) //****************...