Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
LE TROLL
Private Declare Function SetCursorPos Lib "user32" ( _ ByVal x As Long, ByVal y As Long) As Long
Sub Form_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single) If Button = 1 Then x = 50 y = 75 Call SetCursorPos(x, y) endif End Sub
-- Romans, logiciels, email, site personnel http://irolog.free.fr/joe.htm ------------------------------------------------------------------------------------ "Microsoft" <news.microsoft.com> a écrit dans le message de news: OdA%23$k$ | Bonjour a tous, | | Dans mon programme, quand l'utilisateur a cliquer avec la souris, j'aimerais | deplacer le cursseur de la souris. | La "sortir" d'un treeview par example. | | comment faire? | | Merci de votre aide. | | Salva | | -- | |
Private Declare Function SetCursorPos Lib
"user32" ( _
ByVal x As Long, ByVal y As Long) As Long
Sub Form_MouseDown(Button As Integer, Shift As
Integer, x As Single, y As Single)
If Button = 1 Then
x = 50
y = 75
Call SetCursorPos(x, y)
endif
End Sub
--
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
"Microsoft" <news.microsoft.com> a écrit dans le
message de news:
OdA%23$k$jIHA.5820@TK2MSFTNGP04.phx.gbl...
| Bonjour a tous,
|
| Dans mon programme, quand l'utilisateur a
cliquer avec la souris, j'aimerais
| deplacer le cursseur de la souris.
| La "sortir" d'un treeview par example.
|
| comment faire?
|
| Merci de votre aide.
|
| Salva
|
| --
|
|
Private Declare Function SetCursorPos Lib "user32" ( _ ByVal x As Long, ByVal y As Long) As Long
Sub Form_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single) If Button = 1 Then x = 50 y = 75 Call SetCursorPos(x, y) endif End Sub
-- Romans, logiciels, email, site personnel http://irolog.free.fr/joe.htm ------------------------------------------------------------------------------------ "Microsoft" <news.microsoft.com> a écrit dans le message de news: OdA%23$k$ | Bonjour a tous, | | Dans mon programme, quand l'utilisateur a cliquer avec la souris, j'aimerais | deplacer le cursseur de la souris. | La "sortir" d'un treeview par example. | | comment faire? | | Merci de votre aide. | | Salva | | -- | |
Salva
Bonjour,
Merci pour la reponse.
a +
Salva
"LE TROLL" <le a écrit dans le message de news:
Private Declare Function SetCursorPos Lib "user32" ( _ ByVal x As Long, ByVal y As Long) As Long
Sub Form_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single) If Button = 1 Then x = 50 y = 75 Call SetCursorPos(x, y) endif End Sub
-- Romans, logiciels, email, site personnel http://irolog.free.fr/joe.htm ------------------------------------------------------------------------------------ "Microsoft" <news.microsoft.com> a écrit dans le message de news: OdA%23$k$ | Bonjour a tous, | | Dans mon programme, quand l'utilisateur a cliquer avec la souris, j'aimerais | deplacer le cursseur de la souris. | La "sortir" d'un treeview par example. | | comment faire? | | Merci de votre aide. | | Salva | | -- | |
Bonjour,
Merci pour la reponse.
a +
Salva
"LE TROLL" <le troll@enfer.fr> a écrit dans le message de news:
OYxGaZAkIHA.5584@TK2MSFTNGP02.phx.gbl...
Private Declare Function SetCursorPos Lib
"user32" ( _
ByVal x As Long, ByVal y As Long) As Long
Sub Form_MouseDown(Button As Integer, Shift As
Integer, x As Single, y As Single)
If Button = 1 Then
x = 50
y = 75
Call SetCursorPos(x, y)
endif
End Sub
--
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
"Microsoft" <news.microsoft.com> a écrit dans le
message de news:
OdA%23$k$jIHA.5820@TK2MSFTNGP04.phx.gbl...
| Bonjour a tous,
|
| Dans mon programme, quand l'utilisateur a
cliquer avec la souris, j'aimerais
| deplacer le cursseur de la souris.
| La "sortir" d'un treeview par example.
|
| comment faire?
|
| Merci de votre aide.
|
| Salva
|
| --
|
|
Private Declare Function SetCursorPos Lib "user32" ( _ ByVal x As Long, ByVal y As Long) As Long
Sub Form_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single) If Button = 1 Then x = 50 y = 75 Call SetCursorPos(x, y) endif End Sub
-- Romans, logiciels, email, site personnel http://irolog.free.fr/joe.htm ------------------------------------------------------------------------------------ "Microsoft" <news.microsoft.com> a écrit dans le message de news: OdA%23$k$ | Bonjour a tous, | | Dans mon programme, quand l'utilisateur a cliquer avec la souris, j'aimerais | deplacer le cursseur de la souris. | La "sortir" d'un treeview par example. | | comment faire? | | Merci de votre aide. | | Salva | | -- | |