Cacher le curseur sur tout l'écran pas seulement dans le programme appellant

Bonjour,
j'aimerais savoir comment cacher le curseur. J'utilise la fonction showcursor comme cela:

b1 = CLng(Not chkCacherCurseur.Value)
l1 = ShowCursor(b1)

If b1 = False And l1 >= 0 Then
    Do
        l1 = ShowCursor(False)
        DoEvents
    Loop While l1 >= 0
ElseIf b1 = True And l1 <= 0 Then
    Do
        l1 = ShowCursor(True)
        DoEvents
    Loop While l1 < 0
End If

Ce code permet bien de cacher le curseur mais uniquement sur la fenêtre où ce code est écrit! J'aimerais savoir comment cacher le curseur mais sur tout l'écran.
Merci, bonne prog'

Salut,
Tu peux toujours utiliser l'api ClipCursor en plus pour limiter le déplacement du curseur dans le rectangle de ta form.
Mais bon, je ne vois pas à quoi ça peut servir.

-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?

Je ne veux pas limiter le déplacement, je veux cacher le curseur!

Ben si tu limite la déplacement de la souris à ta feuille, et que tu utilise un ShowCursor, ca devrait pouvoir la masquer sur tout l'écran logiquement...

Sinon, vois les api setcursor ou mieux setsystemcursor, il y a peut-être un moyen mais je n'ai pas testé.

-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?

Ok je testerais clipcursor + showcursor et je vous tiendrais au courant.
SetSystemCUrsor j'ai essayé le problème  c'est que cela modifie les paramètres système et il faut pouvoir appliqué un curseur transparent à tous les curseurs (hand, normal...)

Nan le clipcursor marche pas. Comment faut-il l'utiliser avec showcusor darsidious? Ma feuille est invisible et j'aimerais que le curseur puisse aller partout sur l'écran et non seulement dans une zone spécifique de l'écran.

Je viens de teste chez moi, et le showcursor marche très bien, que la souris soit sur le prog appelant ou pas !

Chez moi ce n'est pas le cas! Peux-tu ù'envoyer le code que tu utilises? c'est le meme que le mien?. merci