Bonjour,
essayez ceci :
Dans le code du Projet, dans initialisation...
WM_LBUTTONDOWN est un entier = 513
Evénement(ClicSouris, "*.*", WM_LBUTTONDOWN)
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
Info("c'est un bouton")
ExécuteTraitement(MoiMême, trtClic)
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
CdltMensagem modificada, novembro, 04 2025 - 9:29 PM