Gestion des pointeurs de souris

[WILFRIED]

Bonjour à tous et toutes,

J'ai besoin pour un ptit jeu xld que je prépare de modifier le pointeur de souris afin que le joureur identifie les zones où il devra cliquer...

J'ai essayer avec :
mousepointer=fm....

mais cela ne change pas (sniff)

peut être ne l'utilisé je pas correctement..

Merci d'avance pour vos conseil..

A+

 

[porcinet82]

Re : Gestion des pointeurs de souris

Salut WILFRIED,

Un petit exemple de ce que tu peux faire. Avec ce petit bout de code, le pointeur de la souris change lorsque tu le places au dessus du bouton.

Private Sub CommandButton1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
    CommandButton1.MousePointer = fmMousePointerNoDrop
End Sub

Tu peux egalament trouver plus d'explication dans l'aide.

@+

 

[WILFRIED]

Re : Gestion des pointeurs de souris

Salut porcinet,

tous d'abord merci de prendre le temps de me repondre..

En faite j'ai il s'agit d'une image et non pas d'un bouton (je sais pas ci cela chance quelque chose...), et j'ai essaye cela mais rien ne ce passe à moins que l'on clique....

voici mon code :

Private Sub Img_chance_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
MousePointer = fmMousePointerIBeam
End Sub

Private Sub img_plateau_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
MousePointer = fmMousePointerDefault
End Sub

Peut être cela pourra aider..

Encore merci.

 

[WILFRIED]

Re : Gestion des pointeurs de souris

Salut josé,porcinet....

désolé du delai de reponse mais je bosse dur sur ce "pti jeu"...

Le controls mousepointer ne fonctionne qu'avec un fmmousecustom de mémoire et il faut trouver le curseur de main...

et non pas demain...ARF...

Au fait on dit bien un ongulé quand on parle de chevaux il faut faire gaffe une faute d'orthographe est vite glissé...

A+

 

[Bricofire]

Re : Gestion des pointeurs de souris

Bonjour à tous, 🙂

Wilfried, en PJ un USF avec un pointeur à lui, comportant une image avec son pointeur et un bouton avec son pointeur, je ne sais pas si c'est ce dont tu patrles, mais si ça peut t'aider...
(le DG est petit, mais à la base destiné àcomme fond d'un bouton de barre d'outil en dessin...)

Bon WE,

Brico

 

[WILFRIED]

Re : Gestion des pointeurs de souris

Coucou brico...


Merci pour ton usf je vais tester cela sur mon barba_jeu_XLD tous de suite

A+

 

[zeltron]

Re : Gestion des pointeurs de souris

Bonjour à tout le forum, à Bricofire et Wielfred

Bricofire, j'ai vu ton fichier joint, mais je n'arrive pas a comprendre comment tu arrive a faire cela, je suis allé dans le VBA et dans les propriétés des boutons, . J'ai bien vu que la souris étais sur"custom", mais peux tu précsier car dans ton fichier joint, il n'y a pas les icones qui apparaissent. Ou va t il les chercher, je n'arrive pas a comprendre. Peux tu expliquer s'il te plait?

Par avance, merci

Zeltron

 

[Mytå]

Re : Gestion des pointeurs de souris

Salut Zeltron et le forum

Dans la proprièté MouseIcon,

trouve une image au format *.ico

Mytå

 

[Bricofire]

Re : Gestion des pointeurs de souris

Bonjour tout le monde, 🙂

Zeltron, c'est exactement ce que disait José plus haut, sauf besoin, pas la peine de s'ennuyer avec du code, c'est pour ça que tu n'en vois pas...
C'est comme explique Myta, dans l'écran d'éditeur de VBA, pour l'objet considéré, tu as une fenêtre propriété, dans celle-ci tu peux trouver pour certains une propriété MouseIcon et Une MousePointer.
Pour faire ton truc perso, tu cliques sur Mouseico, et tu vas chercher sur ton DD l'ïcone voulu, ensuite tu cliques sur MousePointer et tu valides fmMousePointerCustom.
Pour que l'image soit reconnue, il faut qu'elle soit au format .ico , donc soit tu la crée avec un logiciel ad-hoc (éditeur d'îcones ou de dessin compatible, ca que j'ai fait dans le précédent post), soit tu tapes par exemple "dessin icone" dans Google et tu explores, L'USF joint a un pointeur récupéré ici:
IcoMania.com | icons , .ico , images , pictures + de 14 000 icones ! / More than 14 000 icons ! très riche...

Bonne journée,

 

[zeltron]

Re : Gestion des pointeurs de souris

Merci a tous pour vos explications

Cordialement

Zeltron

 

[WILFRIED]

Re : Gestion des pointeurs de souris

Salut à tous et toutes

merci à tous pour vos conseil.

J'ai réussi à utiliser la propriete comme tu me l'indiquait et cela marche donc merci beaucoup..

A+