diablamanshadow
Messages postés419Date d'inscriptionlundi 30 août 2004StatutMembreDernière intervention28 janvier 2008
-
7 nov. 2006 à 00:00
diablamanshadow
Messages postés419Date d'inscriptionlundi 30 août 2004StatutMembreDernière intervention28 janvier 2008
-
9 nov. 2006 à 02:03
Bonjour j'aimerais inverser la mouvement de la souris donc si on va a gauche la souris va a droite si on va en haut sa va en bas etc j'ai donc penser a ce coder tirer pour la plus grosse partie de celle de nix pour recuperer la position de la souris
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
Private Declare Function SetCursorPos& Lib "user32" (ByVal x As Long, ByVal y As Long)
Private Type POINTAPI
x As Long
y As Long
End Type
Private Sub Timer1_Timer()
Dim pos As POINTAPI
Dim ret As Long
ret = GetCursorPos(pos)
Text1.Text = Str(pos.x) + " " + Str(pos.y)
If Str(pos.x) = Str(pos.x) + 1 Then SetCursorPos Str(pose.x - 2), Str(pos.y)
If Str(pos.x) = Str(pos.y) + 1 Then SetCursorPos Str(pose.x), Str(pos.y - 2)
End Sub
mais cela ne fonctionne pas donc je vois plus trop quoi faire j'ai essayer beaucoup de code et bon aucun fonctionne donc si vous savez comment faire je suis prenneur ;-)
diablamanshadow
Messages postés419Date d'inscriptionlundi 30 août 2004StatutMembreDernière intervention28 janvier 2008 7 nov. 2006 à 02:20
comment ca je n'ai pas trop compris :-/
je peux remplacer l'icone par defaut de windows depuis mon logiciel vb ? et ensuite le code que j'ai mis ci dessus fonctionnera ? si ses ca comment modifier cette icone ? ^^
et est ce que mon code fera exactement ce que je veux ? ^^
le cancre
Messages postés292Date d'inscriptionmercredi 25 octobre 2006StatutMembreDernière intervention27 novembre 2009 7 nov. 2006 à 02:37
bien entendu c'est pas la meilleure solution
tu prends une pic et tu colle l'image de ton curseur
evidement tu auras un carré, à l'aide d'un masque tu supprime le carré en gardant que l'image de ton curseur
à partir de la....tu rend le vrai curseur invisible
tu chope la position du vrai curseur
et tu donne la valeur au faux curseur
un exemple
position de départ du vrai curseur x = 0
déplacement
vrai curseur x = 10
position du faux curseur = - x
mais ya peut etre mieux j'ai pas trop réfléchi
cs_DARKSIDIOUS
Messages postés15814Date d'inscriptionjeudi 8 août 2002StatutMembreDernière intervention 4 mars 2013130 7 nov. 2006 à 07:05
Mouais, c'est vraiment de la bidouille !
Il vaudrait mieux plutôt intercepter les messages windows par subclassing, ce sera plus fluide : dans ton code, l'utilisation d'un timer prend des ressources, et surtout, tu obtiendras du clignotement à l'écran !
Vous n’avez pas trouvé la réponse que vous recherchez ?
diablamanshadow
Messages postés419Date d'inscriptionlundi 30 août 2004StatutMembreDernière intervention28 janvier 2008 7 nov. 2006 à 13:57
tu peux un peux plus developpement ton idee darksidious ?
sinon le cancre comment faire pour mettre la vrai souris invisible et mettre un "masque" pour mettre le fond de l'img invisible ?
cs_DARKSIDIOUS
Messages postés15814Date d'inscriptionjeudi 8 août 2002StatutMembreDernière intervention 4 mars 2013130 7 nov. 2006 à 14:09
Recherche un peu dans les sources de subclassing, tu verra vite ce que je veux dire : Intercepter le message WM_MOUSEMOVE, puis recalculer les nouvelles positions de la souris à chaque message intercepté.
le cancre
Messages postés292Date d'inscriptionmercredi 25 octobre 2006StatutMembreDernière intervention27 novembre 2009 7 nov. 2006 à 14:22
dis moi si je me trompe Dark
ta méthode du subclassing c'est uniquement sur la form en elle meme..tu interceptes les messsage que pour cette form ...et non pour le reste..bureau,autre application,etc
diablamanshadow
Messages postés419Date d'inscriptionlundi 30 août 2004StatutMembreDernière intervention28 janvier 2008 7 nov. 2006 à 14:27
le cancre tu saurais m'orienter pour comment mettre le fond invisible sinon donner a un objet la meme position que la souris sa auras la meme position mais a l'interieur de la frm non ?
diablamanshadow
Messages postés419Date d'inscriptionlundi 30 août 2004StatutMembreDernière intervention28 janvier 2008 7 nov. 2006 à 14:34
non l'inversion se ferais sur tous l'ecran enfin partout la frm serais elle invisible et la souris serais "inversee" comme un hoax si tu veux mais plutot pour comme dans les jeu inverser l'axe de la souris ;-)
cs_DARKSIDIOUS
Messages postés15814Date d'inscriptionjeudi 8 août 2002StatutMembreDernière intervention 4 mars 2013130 7 nov. 2006 à 16:16
Arf, lecancre, t'as moins de patience que moi ;)
Ca fait 4 ans que je donne mon aide sur VBFrance, et plus ca va, et plus j'ai l'impression qu'on fait les recherches à la place des membres... la grande majorité des demandes concernant des choses qui ont déjà été demandé sur le forum, ou même qui ont carrément déjà une source développé sur le sujet précis (comme ici par exemple...).
diablamanshadow
Messages postés419Date d'inscriptionlundi 30 août 2004StatutMembreDernière intervention28 janvier 2008 9 nov. 2006 à 02:03
cependant la source qu'il viens de proposee je l'ai trouvee par hasard sur google y a quelques heure (pas msn ouvert pas vu qu'il avais repondu)
mais quand ont fait une recherches sur ce site on a que deux pages de resultat generalement ne concernant meme pas la recherche donc ses sur qu'a moins de s'acharner a rechercher tous les termes possible ont trouve pas et bon enfin merci quand meme ;-)