Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic Shell, hwnd...

Shell, hwnd...

6 réponses
Avatar
Weby
Salut,

Je cherche a changer le titre d'une application que je viens de lancer a
l'aide de shell()

J'ai trouvé l'API pour changer le titre, (Setwindowtext) mais celle-ci
demande, de facon normale, un hwnd.

Sachant que je fais un shellnum=shell(Application)

Comment je peux transformer mon shellnum en hwnd ?

Merci,
Weby
Signaler un problème avec ce contenu

6 réponses

Supprimer
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
Avatar
Zoury
Salut Weby! :O)

Regarde l'exemple suivant :

Obtaining the hWnd of an Application Started with Shell
http://www.mvps.org/vbnet/code/system/shellhwnd.htm

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous
"Weby" wrote in message
news:3f903178$0$2797$
Salut,

Je cherche a changer le titre d'une application que je viens de lancer a
l'aide de shell()

J'ai trouvé l'API pour changer le titre, (Setwindowtext) mais celle-ci
demande, de facon normale, un hwnd.

Sachant que je fais un shellnum=shell(Application)

Comment je peux transformer mon shellnum en hwnd ?

Merci,
Weby




Avatar
Weby
Génial merci beaucoup !!

A+!

"Zoury" <yanick_lefebvre at hotmail dot com> a écrit dans le message de
news:
Salut Weby! :O)

Regarde l'exemple suivant :

Obtaining the hWnd of an Application Started with Shell
http://www.mvps.org/vbnet/code/system/shellhwnd.htm

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous
"Weby" wrote in message
news:3f903178$0$2797$
> Salut,
>
> Je cherche a changer le titre d'une application que je viens de lancer a
> l'aide de shell()
>
> J'ai trouvé l'API pour changer le titre, (Setwindowtext) mais celle-ci
> demande, de facon normale, un hwnd.
>
> Sachant que je fais un shellnum=shell(Application)
>
> Comment je peux transformer mon shellnum en hwnd ?
>
> Merci,
> Weby
>
>




Avatar
Weby
Salut,

Alors ca ne marche pas je comprend pas pourquoi :

Dim accobj As access.Application
'Access Runtime
If FlagRuntime Then
Dim accshell As Long
If specifik Then
accshell = Shell(y_accpath + " " + Chr(34) + y_basetatspecif + Chr(34),
vbMaximizedFocus)
Set accobj = GetObject(y_basetatspecif)
Else
accshell = Shell(y_accpath + " " + Chr(34) + y_basetat + Chr(34),
vbMaximizedFocus)
Set accobj = GetObject(y_basetat)
End If
y_comptetat = y_comptetat + 1
Dim startshell As Long
startshell = GethWndFromProcessID(accshell)
Call SetWindowText(startshell, "Etat n° " + y_comptetat)
Else

Je copie le bout de code que je suis en train de faire. Pas la peine de
poser des questions quand au "comment" je m'y prend : j'utilise le runtime
access en mode TSE et c'est assez complexe.

Je me prend une erreur sur la ligne :
Call SetWindowText(startshell, "Etat n° " + y_comptetat)

"type incompatible" comme message d'erreur, et startshell vaut 2164046.

J'ai bien déclaré les fonctions que j'utilises auparavant, c'est juste que
apparemment il aime pas le hwnd en tant que long (pourtant ca doit etre un
long non ?)

Merci,
Weby


"Zoury" <yanick_lefebvre at hotmail dot com> a écrit dans le message de
news:
Salut Weby! :O)

Regarde l'exemple suivant :

Obtaining the hWnd of an Application Started with Shell
http://www.mvps.org/vbnet/code/system/shellhwnd.htm

--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous
"Weby" wrote in message
news:3f903178$0$2797$
> Salut,
>
> Je cherche a changer le titre d'une application que je viens de lancer a
> l'aide de shell()
>
> J'ai trouvé l'API pour changer le titre, (Setwindowtext) mais celle-ci
> demande, de facon normale, un hwnd.
>
> Sachant que je fais un shellnum=shell(Application)
>
> Comment je peux transformer mon shellnum en hwnd ?
>
> Merci,
> Weby
>
>




Avatar
Zoury
Essaie d'appeler SetWindowText dans un bouton à part après avoir démarrer
ton programme access pour voir? c'Est peut-être que la fenêtre n'a pas
encore eu le temps de se charger.. si ça marche je te posterai un solution
qui devrait faire en sorte que ça fonctionne..


--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous
Avatar
Weby
Salut,

Donc en fait le problèm du type incompatible c'etait une erreur de moi, je
devait faire un cstr( int ) pour que ca marche et ca avait rien a voir avec
le problème.

Mais en fait, le programme me renvoie un mauvais HWND, ne representant pas
l'application que j'ai lancée avec shell...

Si je remplaces le HWND que la fonction trouve, par accobj.HwndAccess (ou un
truc du genre), ca me change bien le titre de la fenetre access... Par
contre, en utilisant la fonction HwndGetByProcessId (ou du genre :) ) le
hwnd est completement différent... Je vais continuer mes essais et te tenir
au courant.

EN tout cas merci bcp :)

A
"Zoury" <yanick_lefebvre at hotmail dot com> a écrit dans le message de
news:
Essaie d'appeler SetWindowText dans un bouton à part après avoir démarrer
ton programme access pour voir? c'Est peut-être que la fenêtre n'a pas
encore eu le temps de se charger.. si ça marche je te posterai un solution
qui devrait faire en sorte que ça fonctionne..


--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/

Merci de poster les réponses au groupe afin d'en faire profiter à tous




Avatar
Weby
Resalut,

j'ai fait pas mal de test, et en utilisant le site que tu m'as donné, et
meme :
http://support.microsoft.com/default.aspx?scid=http://support.microsoft.com:80/support/kb/articles/Q242/3/08.ASP&NoWebContent=1

qui explique avec un exemple et des api pratiquement similaire.

Mais rien a faire, le HWND d'access et le HWND qu'il me trouve ne sont pas
les mêmes, et donc il me trouve pas le bon HWND (c'est a se tirer les
cheveux...) par contre avec notepad et tout et tout ca marche, mais la juste
parce que c'est access et que visual s'attend que j'utilise les automation,
eh ben ca marche pas !!

Je sais comment je vais faire, je vais rusé en utilisant des coordonées x et
y sur l'écran, car mon état s'ouvre en mode plein écran, donc si je le fais
juste après ca ne devrait pas poser de problèmes.

Merci pour l'aide.
Weby
"Weby" a écrit dans le message de
news:3f903178$0$2797$
Salut,

Je cherche a changer le titre d'une application que je viens de lancer a
l'aide de shell()

J'ai trouvé l'API pour changer le titre, (Setwindowtext) mais celle-ci
demande, de facon normale, un hwnd.

Sachant que je fais un shellnum=shell(Application)

Comment je peux transformer mon shellnum en hwnd ?

Merci,
Weby