Trouver les applications qui tourne en meme tps que la sienne
Soyez le premier à donner votre avis sur cette source.
Snippet vu 3 448 fois - Téléchargée 60 fois
Contenu du snippet
Source / Exemple :
Private Declare Function GetWindow Lib "user32" (ByVal hwnd As Long, ByVal wCmd As Long) As Long
Private Declare Function GetParent Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function GetWindowTextLength Lib "user32" Alias "GetWindowTextLengthA" (ByVal hwnd As Long) As Long
Private Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal IpString As String, ByVal cch As Long) As Long
Const GW_HWNDFIRST = 0
Const GW_HWNDNEXT = 2
Sub ListeTache()
Dim CurrWnd As Long
Dim Length As Long
Dim TaskName As String
Dim Parent As Long
List1.Clear
CurrWnd = GetWindow(Form1.hwnd, GW_HWNDFIRST)
While CurrWnd <> 0
Parent = GetParent(CurrWnd)
Length = GetWindowTextLength(CurrWnd)
TaskName = Space$(Length + 1)
Length = GetWindowText(CurrWnd, TaskName, Length + 1)
TaskName = Left$(TaskName, Len(TaskName) - 1)
If Length > 0 Then
If TaskName <> Me.Caption Then
List1.AddItem TaskName
End If
End If
CurrWnd = GetWindow(CurrWnd, GW_HWNDNEXT)
DoEvents
Wend
End Sub
Conclusion :
et voila!
si vous avez des questions sur ce code pas de probleme posez la moi.
A voir également
- Trouver les applications qui tourne en meme tps que la sienne
- Connaitre le nom d'executable d'une application qui tourne ✓ - Forum - Visual Basic
- Comment trouver l'url d'une application - Guide
- Trouver le nom de la classe windows d'une application en cours - Codes sources - Visual Basic / VB.NET (API)
- Visual Basic / VB.NET : Fonction d'auto suppression de l'application ou elle se trouve; et comment f - Guide
- Visual Basic / VB.NET : Le carnet d'adresse et de mails : application tournant avec easy skin de no - Guide
Les titres des fenetres que je veux manipuler changent, je ne peux donc que me référencer aux noms des exécutables et non des fentres, et ça sur le site j'ai pas encore vu pour trouver le handle à partir d'un exe...
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.