Question sur le hwnd

Bonjour a tous, j'aimerais savoir comment je peut avoir le hwnd d'une application dès son lancement.

Merci d'avance

Private Sub Form_Load() MsgBox Form1.hWnd End Sub

Manu

Faut pas me prendre pour un cn non plus :P je veut avoir le hwnd d'une application lancé avec shell()

Ce serait pas plutot le PID que tu cherches ?

Christophe R.

PID comme hwnd (pour moi) ... je veut le numero qui identifie le programme que je lance c'est tout.

Ben un Process Identificator et un Window Handler ca n'a rien à voir ! Et tu n'auras ta réponse que lorsque tu sera plus aimable avec Econs !!

Christophe R.

Christophe R. tu délire? t'a vue ou que j'ai pas été aimble?

Bonjour l0st3d !

Je viens juste de voir que tu avais unbe question concernant la récupération du no de "handle" d'une application appelée par la commande "shell"

En fait shell peut être exécuté directement par exemple:
Private Sub test()
Shell("notepad.exe", vbHide)
End Sub

Mais si tu veux "récupérer" le no de "handle" alors il faut le faire de la façon suivante:
Private Sub test()
Dim HNWD As Double
HNWD = Shell("notepad.exe", vbHide)
MsgBox "Le no de handle est : " & HNWD
End Sub

Espérant que cela te sois utile !
A+
Anael
Celui qui sait peu parle beaucoup... Celui qui sait parle peu... Zeta

anael_vodis < JE me répête, mais un PID et un HWND, cela n'a rien a voir !!!!!!!!! Vous mélanger tout les gars !!

Christophe R.

crenaud76,

je crois que tu aurais besoin d'un cours de politesse... Tu ne respecte pas "l'étiquette" qui devrait être de mise sur tout forum... Il aurait été plus sage de donner l'info à l0st3d en le renseignant que c'est le Process ID qu'il recherchait en non pas le numéro de handle de Windows... Le but d'un forum est de s'entraider afin de favoriser le développement de chacn de ses membres et non pas de "rire" des autres en se plaçant sur un piédestal de "je sais tout" sans donner aucune piste ni explication pertinente. Alors, mon conseil est celui-ci: si ça ne te dit pas de donner de réponse valable à une question d'un membre d'un forum alors abstiens-toi de ne donner que des remarques désobligeante... À bon entendeur...

Oui tu as raison... l'exemple que je donnais ne va retourner que le Process ID mais je crois que c'est la réponse que l0std3 voulait avoir. Par sa question j'ai bien vu qu'il recherchait à récupérer le Process ID...


Pour récupérer donc le Process ID à partir d'une fonction Shell:
Private Sub test()
Dim NoPID As Double
NoPID = Shell("notepad.exe", vbHide)
MsgBox "Le no de handle est : " & NoPID
End Sub


Pour récupérer le no de handle d'une fenêtre active (on peut rendre active la fenêtre d'une application à partir de son process ID) il faut utiliser la fonction GetActiveWindows de l'API (user32.dll):

Declare Function GetActiveWindow Lib "user32.dll" () As Long

Sub Test()
Dim HandleNo As Long
HandleNo = GetActiveWindows()
MsgBox "Le no du Handle est: " & HandleNo
End Sub



Généralement celui qui parle beaucoup sait bien peu de choses... Celui qui par sagesse parle peu sait beaucoup de choses...Zeta