[VBA] récuper le handles d'une fenetre active
Résolu/Fermé
goldenmike
Messages postés
315
Date d'inscription
samedi 21 juillet 2007
Statut
Membre
Dernière intervention
23 août 2012
-
17 avril 2009 à 18:04
goldenmike Messages postés 315 Date d'inscription samedi 21 juillet 2007 Statut Membre Dernière intervention 23 août 2012 - 17 mai 2009 à 18:57
goldenmike Messages postés 315 Date d'inscription samedi 21 juillet 2007 Statut Membre Dernière intervention 23 août 2012 - 17 mai 2009 à 18:57
A voir également:
- [VBA] récuper le handles d'une fenetre active
- Activer le pavé tactile - Guide
- Raccourci agrandir fenetre - Guide
- Fenetre privée - Guide
- Vba ouvrir un fichier excel avec chemin ✓ - Forum VB / VBA
- Le message n'a pas été envoyé car le service n'est pas activé sur le réseau - Forum Xiaomi
11 réponses
Utilisateur anonyme
17 avril 2009 à 19:21
17 avril 2009 à 19:21
Bonjour,
Exemple type VB2008:
Notez qu'il est possible de parcourrir tous les process en action !
Lupin
Exemple type VB2008:
Imports System.Diagnostics.Process Imports System.Text ''' <summary> ''' Exemple de capture du Handle ''' du process actif ''' </summary> ''' <remarks></remarks> Public Class Form1 Sub CaptureProcessActif() Dim Message As New StringBuilder Dim Proc As Process Proc = System.Diagnostics.Process.GetCurrentProcess Message.AppendLine("Nom du process : " & Proc.ProcessName) Message.AppendLine("Numéro du PID : " & Proc.Id) Message.AppendLine("Handle du process : " & Proc.Handle.ToString) MessageBox.Show(Message.ToString) Debug.Print(Proc.ProcessName) Debug.Print(Proc.Id) Debug.Print(Proc.Handle) End Sub End Class '
Notez qu'il est possible de parcourrir tous les process en action !
Sub CreerListeProcess() Dim ProcessList As System.Diagnostics.Process() Dim Proc As System.Diagnostics.Process Dim LaListe As New ArrayList ProcessList = System.Diagnostics.Process.GetProcesses() For Each Proc In ProcessList LaListe.Add(Proc.ProcessName) Next End Sub
Lupin
Utilisateur anonyme
17 avril 2009 à 20:35
17 avril 2009 à 20:35
re:
Non, l'extension n'est pas requise à moins de cas spéciaux qui me serait
inconnu à ce jour.
Pour être certain du nom, utilise ce code pour faire afficher tous les noms :
Lupin
Non, l'extension n'est pas requise à moins de cas spéciaux qui me serait
inconnu à ce jour.
Pour être certain du nom, utilise ce code pour faire afficher tous les noms :
Sub CreerListeNomProcess() Dim ProcessList As System.Diagnostics.Process() Dim Proc As System.Diagnostics.Process Dim Message As New StringBuilder ProcessList = System.Diagnostics.Process.GetProcesses() For Each Proc In ProcessList Message.AppendLine(Proc.ProcessName) Next MessageBox.Show(Message.ToString) End Sub
Lupin
goldenmike
Messages postés
315
Date d'inscription
samedi 21 juillet 2007
Statut
Membre
Dernière intervention
23 août 2012
52
17 avril 2009 à 19:56
17 avril 2009 à 19:56
Merci beaucoup !
MESSAGE A LUPIN.A
Merci !
J'ai tout de meme quelques questions :
- comment je fais pour recuper le Handles de mon processus ?? Tu n'as pas repondu a ma question .. :)
Merci d'avance
MESSAGE A LUPIN.A
Merci !
J'ai tout de meme quelques questions :
- comment je fais pour recuper le Handles de mon processus ?? Tu n'as pas repondu a ma question .. :)
Merci d'avance
Utilisateur anonyme
17 avril 2009 à 23:25
17 avril 2009 à 23:25
re:
En fait, j'avais bien compris que c' était ton objectif :-)
Le paramètre [ Size ] est effectivement en général un paramètre en lecture/écriture.
Le paramètre [ Opacité ] est un paramètre qui m'est inconnu tant par son
type que ses méthodes et attributs.
N'ayant pas encore utilisé ces paramètres, je ne puis te guider davantage.
Google devrait combler ce manque à finir !
Tout le code déposé ici à été trouvé à l'aide de la toile, j'ai bien sur renommer
les objets pour bien comprendre ce que je codais car il y a souvent des erreurs à
corriger. J'y ai trouvé comment utilisé un crayon, une brosse pour dessiner
des formes.
J'ai pu te répondre car je travaille moi-même sur une version d'un gestionnaire
de tâches personnalisé, mais c'est ma deuxième application maison VB2008.
Lupin
En fait, j'avais bien compris que c' était ton objectif :-)
Le paramètre [ Size ] est effectivement en général un paramètre en lecture/écriture.
Le paramètre [ Opacité ] est un paramètre qui m'est inconnu tant par son
type que ses méthodes et attributs.
N'ayant pas encore utilisé ces paramètres, je ne puis te guider davantage.
Google devrait combler ce manque à finir !
Tout le code déposé ici à été trouvé à l'aide de la toile, j'ai bien sur renommer
les objets pour bien comprendre ce que je codais car il y a souvent des erreurs à
corriger. J'y ai trouvé comment utilisé un crayon, une brosse pour dessiner
des formes.
J'ai pu te répondre car je travaille moi-même sur une version d'un gestionnaire
de tâches personnalisé, mais c'est ma deuxième application maison VB2008.
Lupin
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
goldenmike
Messages postés
315
Date d'inscription
samedi 21 juillet 2007
Statut
Membre
Dernière intervention
23 août 2012
52
17 avril 2009 à 18:38
17 avril 2009 à 18:38
up
Utilisateur anonyme
17 avril 2009 à 20:16
17 avril 2009 à 20:16
re:
Lupin
Sub CreerListeHandle() Dim ProcessList As System.Diagnostics.Process() Dim Proc As System.Diagnostics.Process Dim LaListe As New ArrayList Dim MonHandle As System.IntPtr ProcessList = System.Diagnostics.Process.GetProcesses() For Each Proc In ProcessList If (Proc.ProcessName.ToUpper = "EXCEL") Then Debug.Print(Proc.ProcessName) MonHandle = Proc.Handle LaListe.Add(MonHandle) End If Next End Sub
Lupin
goldenmike
Messages postés
315
Date d'inscription
samedi 21 juillet 2007
Statut
Membre
Dernière intervention
23 août 2012
52
17 avril 2009 à 20:19
17 avril 2009 à 20:19
Merci !
Juste une derniere question : comment puis-je recuper le nom du processus de mon programme ?
Dois-je mettre le .exe avec ?
Juste une derniere question : comment puis-je recuper le nom du processus de mon programme ?
Dois-je mettre le .exe avec ?
goldenmike
Messages postés
315
Date d'inscription
samedi 21 juillet 2007
Statut
Membre
Dernière intervention
23 août 2012
52
17 avril 2009 à 21:10
17 avril 2009 à 21:10
Merci !
Tu es mon sauveur !
Je mets +1 a chaque message + resolu : Je suis super-mega-top-content ce soir quant tu te coucheras tu pourras etre fier de toi ... Tu as fait 1 heureux ....
for i = 0 to 1000
print("MERCI")
@+
Tu es mon sauveur !
Je mets +1 a chaque message + resolu : Je suis super-mega-top-content ce soir quant tu te coucheras tu pourras etre fier de toi ... Tu as fait 1 heureux ....
for i = 0 to 1000
print("MERCI")
@+
goldenmike
Messages postés
315
Date d'inscription
samedi 21 juillet 2007
Statut
Membre
Dernière intervention
23 août 2012
52
17 avril 2009 à 21:19
17 avril 2009 à 21:19
Juste un dernier truc :
Maintenant que je suis sur du nom de mon processus , comment je fasi pour lui attribuer de l'opacité , du Size ?
C'etait mon premier but et j'espere que metre de l'opcaité / size est possible en VB..
Merci d'avance .
Maintenant que je suis sur du nom de mon processus , comment je fasi pour lui attribuer de l'opacité , du Size ?
C'etait mon premier but et j'espere que metre de l'opcaité / size est possible en VB..
Merci d'avance .
goldenmike
Messages postés
315
Date d'inscription
samedi 21 juillet 2007
Statut
Membre
Dernière intervention
23 août 2012
52
18 avril 2009 à 16:30
18 avril 2009 à 16:30
OK , merci tout de meme !
Dommage que tu ne saches pas comment mettre le Size / Opacity .... Ce serait SU-PER !
Mais bon ... J'ai deja beaucoup appris alors merci encore !
@+
Dommage que tu ne saches pas comment mettre le Size / Opacity .... Ce serait SU-PER !
Mais bon ... J'ai deja beaucoup appris alors merci encore !
@+
goldenmike
Messages postés
315
Date d'inscription
samedi 21 juillet 2007
Statut
Membre
Dernière intervention
23 août 2012
52
17 mai 2009 à 18:57
17 mai 2009 à 18:57
up