PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WINDEV (versiones precedentes) → Trigger sur tous les boutons de mon projet ?
Trigger sur tous les boutons de mon projet ?
Iniciado por testeur, 03,nov. 2025 21:06 - 4 respuestas
Publicado el 03,noviembre 2025 - 21:06
Bonjour, Je cherche à exécuter automatiquement une procédure lors du clic sur tous les boutons de mon projet. Quelle serait la meilleure méthode pour y parvenir de manière centralisée et efficace ?
Miembro registrado
995 mensajes
Publicado el 04,noviembre 2025 - 21:24
Bonjour,
essayez ceci :

Dans le code du Projet, dans initialisation...

WM_LBUTTONDOWN est un entier = 513
Evénement(ClicSouris, "*.*", WM_LBUTTONDOWN) // on appelle la procédure Globale ClicSouris


Puis vous créez une procédure Globale nommée "ClicSouris" contenant le code suivant :
(Un message "C'est un bouton" sera alors déclenché pour chaque clic sur un bouton puis le code du bouton est exécuté)
SI MoiMême..Type = 4 ALORS // on vérifie le type du champ. Type 4 est un bouton
Info("c'est un bouton") // on réalise un traitement global (ici un message pour l'exemple)
ExécuteTraitement(MoiMême, trtClic) // on exécute le code initial du bouton
FIN


ou
Exécution du code du bouton puis le message "C'est un bouton" sera déclenché

SI MoiMême..Type = 4 ALORS
ExécuteTraitement(MoiMême, trtClic)
Info("c'est un bouton")
FIN


Cdlt
Mensaje modificado, 04,noviembre 2025 - 21:29
Publicado el 05,noviembre 2025 - 15:58
Cédric_34 a écrit :
Bonjour,
essayez ceci :

Dans le code du Projet, dans initialisation...

WM_LBUTTONDOWN est un entier = 513
Evénement(ClicSouris, "*.*", WM_LBUTTONDOWN) // on appelle la procédure Globale ClicSouris


Puis vous créez une procédure Globale nommée "ClicSouris" contenant le code suivant :
(Un message "C'est un bouton" sera alors déclenché pour chaque clic sur un bouton puis le code du bouton est exécuté)
SI MoiMême..Type = 4 ALORS // on vérifie le type du champ. Type 4 est un bouton
Info("c'est un bouton") // on réalise un traitement global (ici un message pour l'exemple)
ExécuteTraitement(MoiMême, trtClic) // on exécute le code initial du bouton
FIN


ou
Exécution du code du bouton puis le message "C'est un bouton" sera déclenché

SI MoiMême..Type = 4 ALORS
ExécuteTraitement(MoiMême, trtClic)
Info("c'est un bouton")
FIN


Cdlt


Bonjour
Un grand merci à Cédric_34 pour ton soutien et ta réactivité.
Bon dev
Miembro registrado
995 mensajes
Publicado el 06,noviembre 2025 - 14:04
:merci:
Miembro registrado
4.312 mensajes
Publicado el 23,noviembre 2025 - 13:49
Bonjour,
Une autre solution est de créer un modèle de champ incluant la procédure sur Click.
Lors de la création d'un bouton à partir de ce modèle, la procédure sera automatiquement intégrée au code.

--
Il y a peut être plus simple, mais, ça tourne
Quand tout a échoué, utilise l'option RTFM
Mensaje modificado, 23,noviembre 2025 - 14:00