PC SOFT

PROFESSIONAL NEWSGROUPS
WINDEVWEBDEV and WINDEV Mobile

Home → WINDEV 2024 → temporisation de la souris
temporisation de la souris
Started by Trinity, Aug., 16 2017 2:35 PM - 1 reply
Registered member
1 message
Posted on August, 16 2017 - 2:35 PM
Bonjour,
Je cherche un moyen d'afficher une boite de dialogue que si la souris ne bouge pas pendant 2 sec.

J'ai été voir, je peux faire une variable de type Durée mais je ne trouve rien qui pourrais me dire si ma souris a bougée ou non :-/

Savez vous si il existe une fonction booléen qui par exemple indique si la souris est immobile ou non ?


Merci de votre aide :)
Registered member
37 messages
Popularité : +1 (1 vote)
Posted on August, 16 2017 - 3:55 PM
Dans le code d'init de ton projet

EXTERNE "WINCONST.WL"

ghHeureDernierMouvement est une Heure = HeureSys()
Evénement("SOURIS_BOUGE","*.",WM_MOUSEMOVE)


PROCEDURE SOURIS_BOUGE()
// procédure qui change l'heure de référence
ghHeureDernierMouvement = HeureSys()

Et tu crée une procédure automatique qui va boucler pour controler sur le temps d'inactivité est dépassé
//// Procédure automatique :
// La procédure est exécutée automatiquement, après le code d'initialisation du projet, avec un différé de 1 seconde
// Elle sera répétée en boucle, en attendant 1 seconde entre chaque appel
// Chaque appel suivant exécute une seule fois la procédure, sans timer
//

PROCEDURE ControleDurée()
SI HeureDifférence(ghHeureDernierMouvement,HeureSys()) > 200 ALORS
Trace(ChaîneConstruit("Pas bougé depuis %1 secondes",HeureDifférence(ghHeureDernierMouvement,HeureSys())))
FIN

Attention ça ne fonctionne que si ton application a le focus.

--
Cordialement