IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB.NET Discussion :

Cacher curseur si inactif


Sujet :

VB.NET

  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Avril 2008
    Messages
    98
    Détails du profil
    Informations personnelles :
    Âge : 39
    Localisation : France, Paris (Île de France)

    Informations forums :
    Inscription : Avril 2008
    Messages : 98
    Par défaut Cacher curseur si inactif
    Bonjour à tous,

    Je souhaite cacher le curseur au bout de 5 secondes si jamais il ne bouge pas.
    C'est seulement au dessus d'une picturebox.

    Pour faire ca j'ai voulus utiliser un timer avec cursor.hide() , et mettre le cursor.show() dans l'evenement mousemove de la picturebox, sauf que si la souris est dans le cadre de la pb, meme si il ne bouge pas, il considere que la souris est en mouvement donc cursor.show() en boucle

    Si quelqu'un connait un moyen de detecter les mouvements de la souris dans une form ou un control autre qu'avec l'évenement mousemove, ca me serait utile .

    Merci d'avance, cordialement,

    AliHome

  2. #2
    Membre Expert
    Avatar de olsimare
    Inscrit en
    Décembre 2006
    Messages
    1 185
    Détails du profil
    Informations forums :
    Inscription : Décembre 2006
    Messages : 1 185
    Par défaut
    Bonjour.

    Avec un Hook sur la souris ou un IMessageFilter.

    Je t'invite à lire ceci :
    http://olsimare.developpez.com/artic...ook/mousehook/

    Cdt.

  3. #3
    Membre Expert Avatar de OhMonBato
    Homme Profil pro
    Inscrit en
    Mars 2007
    Messages
    2 660
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Morbihan (Bretagne)

    Informations professionnelles :
    Secteur : Industrie

    Informations forums :
    Inscription : Mars 2007
    Messages : 2 660
    Par défaut
    J'ai fait un essai en créant un curseur de taille 1 pixel * 1 pixel que j'ai appelé TestCurseur.cur (pour créer son propre curseur, c'est pas difficile, il faut juste avoir un tout petit peu de temps et chercher sur google) et ensuite avec ce code on s'approche de ce que tu souhaites (on voit le pixel mais ce n'est quand même plus aussi gros que le curseur par défaut). Pour je ne sais quelle raison en créant un curseur totalement transparent, ça ne marchait pas, peut être dû au format d'export de mon prog de création d'image ???

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    PrivateSub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    Debug.Print("timer en route")
    PictureBox1.Cursor = New System.Windows.Forms.Cursor("C:\Windows\Cursors\TestCurseur.cur")
    EndSub
    PrivateSub PictureBox1_MouseHover(ByVal sender AsObject, ByVal e As System.EventArgs) Handles PictureBox1.MouseHover
    Timer1.Enabled = True
    Debug.Print("coucou, j'entre")
    EndSub
    PrivateSub PictureBox1_MouseLeave(ByVal sender AsObject, ByVal e As System.EventArgs) Handles PictureBox1.MouseLeave
    Timer1.Enabled = False
    EndSub
    PrivateSub PictureBox1_MouseMove(ByVal sender AsObject, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseMove
    Static MouseX AsInteger, MouseY AsInteger
    Debug.Print(e.X.ToString & " " & e.Y.ToString & " " & MouseX.ToString & " " & MouseY.ToString)
    If e.X <> MouseX Or e.Y <> MouseY Then
    Cursor = Cursors.Default
    Cursor.Show()
    EndIf
    MouseX = e.X
    MouseY = e.Y
    EndSub
    

Discussions similaires

  1. Comment cacher le curseur dans un Canvas
    Par lostagain dans le forum Tkinter
    Réponses: 5
    Dernier message: 26/01/2011, 21h43
  2. Curseur Sablier et inactif
    Par cornet04 dans le forum VBA Access
    Réponses: 6
    Dernier message: 19/06/2007, 15h32
  3. cacher curseur sur mon edit?
    Par kheldoun ahmed dans le forum Delphi
    Réponses: 3
    Dernier message: 19/05/2007, 21h50
  4. Curseur inactif sur page Web
    Par El_touristo dans le forum Servlets/JSP
    Réponses: 1
    Dernier message: 18/04/2007, 16h22
  5. Changement de curseur inactif
    Par mikaMike dans le forum Windows XP
    Réponses: 3
    Dernier message: 20/10/2006, 20h59

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo