PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV (précédentes versions) → Trigger sur tous les boutons de mon projet ?
Trigger sur tous les boutons de mon projet ?
Débuté par testeur, 03 nov. 2025 21:06 - 5 réponses
Posté le 03 novembre 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 ?
Membre enregistré
1 007 messages
Posté le 04 novembre 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
Message modifié, 04 novembre 2025 - 21:29
Posté le 05 novembre 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
Membre enregistré
1 007 messages
Posté le 06 novembre 2025 - 14:04
:merci:
Membre enregistré
4 316 messages
Posté le 23 novembre 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
Message modifié, 23 novembre 2025 - 14:00
Posté le 27 novembre 2025 - 14:37
Voroltinquo a écrit :
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


Voroltinquo :merci: