Récupérer les coordonées de la fenêtre d'une appli externe
cs_Arnaud01
Messages postés40Date d'inscriptionmardi 22 avril 2003StatutMembreDernière intervention25 avril 2005
-
25 avril 2003 à 09:21
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 2021
-
26 avril 2003 à 00:47
Bonjour à tous,
j'aurai souhaité savoir de quel manière il faut procéder pour récupérer les coordonnées de la fenêtre d'une appli externe si je connai son Handle?
Je cherche celà dans le but de simuler un clique sur une fenêtre précise.
D'ailleur, tout mon problème repose sur le fait que je vais devoir travailler sur des fenêtres qui ne seront pas visibles... (capture écran + simulation de clique) !!!
Si vous avez des idées sur ce point, vous êtes les biens venus.
Merci d'avance de votre aide.
A voir également:
Récupérer les coordonées de la fenêtre d'une appli externe
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 202174 25 avril 2003 à 10:36
A l'aide de son Handle ?? rien de plus simple :
'tu declares
Private Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type
Private Declare Function GetWindowRect Lib "user32" (ByVal hwnd As Long, lpRect As RECT) As Long
'et quand tu souhaites recuperer les coordonées....
Dim R As RECT
GetWindowRect HANDLE, R
je suppose que tu sais simuler un clic ?? , allez , pour la forme :
'tu declares
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Const MOUSEEVENTF_LEFTDOWN = &H2
Const MOUSEEVENTF_LEFTUP = &H4
Const MOUSEEVENTF_MIDDLEDOWN = &H20
Const MOUSEEVENTF_MIDDLEUP = &H40
Const MOUSEEVENTF_MOVE = &H1
Const MOUSEEVENTF_ABSOLUTE = &H8000
Const MOUSEEVENTF_RIGHTDOWN = &H8
Const MOUSEEVENTF_RIGHTUP = &H10
mouse_event MOUSEEVENTF_LEFTDOWN Or MOUSEEVENTF_LEFTUP, X, Y, 0&, 0&
un dernier point , non technique , "bienvenus" , ca s'ecrit en 1 seul mot....
---------------------------------------------------------------
By Renfield
thomas_reynald@msn.com
Aucune touche n'a été bléssée lors de la saisie de ce texte..........
cs_Arnaud01
Messages postés40Date d'inscriptionmardi 22 avril 2003StatutMembreDernière intervention25 avril 2005 25 avril 2003 à 13:39
Merci beaucoup Renfield,
Je suis novice en VB et je galère un peu ... C'est cool de trouver des gens qui peuvent t'aider !
Sinon tu as une idée toi pour l'idée de travailler sur une fenêtre que je ne vois pas, elle serait la bienvenue !! Ca me parait difficile, mais je vais continuer de chercher.