Choisir le curseur de la souris (mousepointer) sous access 2000

Soyez le premier à donner votre avis sur cette source.

Snippet vu 6 373 fois - Téléchargée 37 fois

Contenu du snippet

J'ai cherché longtemps comment faire pour changer le pointeur de la souris dans Access 2000 mais je n'ai pas trouvé la solution sur vbfrance.com (ce qui n'arrive pas souvent). Alors j'ai finalement trouvé ce petit code sur un autre forum qui permet de régler le curseur de la souris comme bon nous semble.
Pour les types de curseurs, aller voir dans la visionneuse d'API, dans les constantes.

Source / Exemple :


'À mettre dans un module (Voir les constantes dans la visionneuse d'API)
Public Const IDC_HAND = 32649&
Public Const IDC_ARROW = 32512&
Public Const IDC_WAIT = 32514&

Public Declare Function LoadCursor Lib "user32" Alias "LoadCursorA" (ByVal hInstance As Long, ByVal lpCursorName As Long) As Long
Public Declare Function SetCursor Lib "user32" (ByVal hCursor As Long) As Long

'Dans votre code

Dim hCur As Long

hCur = LoadCursor(0, IDC_WAIT)
If (hCur > 0) Then
SetCursor hCur
End If

Conclusion :


Merci a vbfrance pour son site
Si vous avez des questions n'hésitez pas

A voir également

Ajouter un commentaire

Commentaires

Neo.balastik
Messages postés
797
Date d'inscription
jeudi 17 mai 2001
Statut
Membre
Dernière intervention
5 mai 2009
3 -
Salut ;O)

Si tu cherchais à afficher le sablier dans Access2000, voici tout simplement la fonction: DoCmd.Hourglass True (false pour enlever)

Aussi, da
Neo.balastik
Messages postés
797
Date d'inscription
jeudi 17 mai 2001
Statut
Membre
Dernière intervention
5 mai 2009
3 -
Salut ;O)

Si tu cherchais à afficher le sablier dans Access2000, voici tout simplement la fonction: DoCmd.Hourglass True (false pour enlever)

Aussi, dans ta source, ShellExecute ne sert strictement à rien...

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.