PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2025 → Gestion des boutons 4 et 5 boutons latéraux de la souris
Gestion des boutons 4 et 5 boutons latéraux de la souris
Débuté par Francis MOREL, 26 mar. 2025 19:50 - 1 réponse
Membre enregistré
356 messages
Posté le 26 mars 2025 - 19:50
Bonjour,

De retour sur Windev pour quelques jours, j'ai été confronté à l'habitude que j'ai d'utiliser les boutons latéraux de la souris pour avancer ou reculer entre pages dans l'explorateur ou de fenêtres en fenêtres dans les applications.
Et bien sur j'ai voulu reproduire ça dans une application Windev.
Je n'ai pas Windev 20xx et peut-être cela est-il automatique maintenant, tellement c'est pratique.
Premier reflexe consulter le forum pour voir comment le problème a été résolu?
Recherche sur XBUTTON1 ou XBUTTON2 (les noms de ces boutons), résultat rien.
Si toutefois quelqu'un est confronté à ce problème voici donc un code qui marche aussi avec des anciennes versions de Windev.

// Test des messages Windows de la Souris
PROCÉDURE FnTestWM()

CONSTANTE
VK_XBUTTON1 = 0X0005
VK_XBUTTON2 = 0X0006
WM_XBUTTONDOWN = 0x020B
FIN

// Déclaration de l'événement de clic sur les boutons spéciaux (4 et 5) de la souris
Evénement(GetMessage, "FnTestWM", 0x020B)

et

// Gestion du clic sur les boutons latéraux de la souris
// https://learn.microsoft.com/fr-fr/windows/win32/inputdev/wm-xbuttondown
PROCÉDURE GetMessage(wMessage,wParam,lParam)

SI ToucheEnfoncée(VK_XBUTTON1,Vrai) ALORS Trace("VK_XBUTTON1")
SI ToucheEnfoncée(VK_XBUTTON2,Vrai) ALORS Trace("VK_XBUTTON2")

RENVOYER Vrai

Bien sur à personnaliser pour en faire ce qu'il est souhaité selon le bouton traité.

Bon développement.

Désolé pour la présentation je ne sais plus comment on met du code entre les balises adéquates
--
Francis MOREL
Message modifié, 26 mars 2025 - 19:52
Posté le 27 mars 2025 - 09:31
Francis MOREL a écrit :
Bonjour,

De retour sur Windev pour quelques jours, j'ai été confronté à l'habitude que j'ai d'utiliser les boutons latéraux de la souris pour avancer ou reculer entre pages dans l'explorateur ou de fenêtres en fenêtres dans les applications.
Et bien sur j'ai voulu reproduire ça dans une application Windev.
Je n'ai pas Windev 20xx et peut-être cela est-il automatique maintenant, tellement c'est pratique.
Premier reflexe consulter le forum pour voir comment le problème a été résolu?
Recherche sur XBUTTON1 ou XBUTTON2 (les noms de ces boutons), résultat rien.
Si toutefois quelqu'un est confronté à ce problème voici donc un code qui marche aussi avec des anciennes versions de Windev.

// Test des messages Windows de la Souris
PROCÉDURE FnTestWM()

CONSTANTE
VK_XBUTTON1 = 0X0005
VK_XBUTTON2 = 0X0006
WM_XBUTTONDOWN = 0x020B
FIN

// Déclaration de l'événement de clic sur les boutons spéciaux (4 et 5) de la souris
Evénement(GetMessage, "FnTestWM", 0x020B)

et

// Gestion du clic sur les boutons latéraux de la souris
// https://learn.microsoft.com/fr-fr/windows/win32/inputdev/wm-xbuttondown
PROCÉDURE GetMessage(wMessage,wParam,lParam)

SI ToucheEnfoncée(VK_XBUTTON1,Vrai) ALORS Trace("VK_XBUTTON1")
SI ToucheEnfoncée(VK_XBUTTON2,Vrai) ALORS Trace("VK_XBUTTON2")

RENVOYER Vrai

Bien sur à personnaliser pour en faire ce qu'il est souhaité selon le bouton traité.

Bon développement.

Désolé pour la présentation je ne sais plus comment on met du code entre les balises adéquates
--
Francis MOREL


Merci Francis