Comment afficher un curseur souris en couleur sans api

Contenu du snippet

VB n'accepte pas les curseurs de souris en couleur. Du moins, il les affiche en noir et blanc. Une astuce pour pallier ce problème est du faire appel à un fichier ressource. En effet, à partir de l'éditeur de ressources, il est possible d'y intégrer des curseurs. Voici comment faire:

Source / Exemple :


'Soit un bouton de commande nommé "MonBoutton"
'Soit un curseur inclus dans le fichier de
'ressources nommé "MonCurseurCouleur"

With Me.MonBoutton
    .MousePointer = vbCustom
    .MouseIcon = LoadResPicture("MonCurseurCouleur", vbResCursor)
 End With

Conclusion :


Il ne faut pas être étonné si lorsque vous lancez l'application dans l'environnement IDE (environnement de programmation), le curseur reste en noir et blanc. Pour obtenir la couleur (faut-il encore que votre curseur soit en couleur...), vous devez compiler l'application et alors l'exécuter...

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.