dhumeau
Messages postés4Date d'inscriptionvendredi 5 janvier 2007StatutMembreDernière intervention30 septembre 2010 30 sept. 2010 à 14:38
Bonjour à tous,
Bravo pour ce code qui fonctionne parfaitement sous Windows XP.
Par contre sous Windows 7 impossible d'avoir le menu contextuel quand on fait un clic droit dans le tableau.
On dirait que c'est la fonction PostMessage qui n'est plus reconnue.
Est-ce que quelqu'un à une idée ?
ShareVB
Messages postés2676Date d'inscriptionvendredi 28 juin 2002StatutMembreDernière intervention13 janvier 201626 22 déc. 2007 à 12:35
werdDomain : je ne me rappelé même plus avoir fait une version VB.Net...je vais d'ailleurs la transformer en vrai POO...
ShareVB
werdDomain
Messages postés60Date d'inscriptionlundi 22 octobre 2007StatutMembreDernière intervention 1 novembre 2011 20 déc. 2007 à 10:52
Salut, Ton code est #1! exactement ce que je cherchais.
a ma grande deception en vb6 :( j'utilise vb.net et je ne connais pas bien les type et la diference de syntax de vb6. De plus je ne dispose pas de visual studio 6... Jai bien observer des similitude mais je suis bloquer a plusieurs points dans la traduction de vb6 à vb.net.
J'ai une application qui remplace la bare des tache mais je doit utiliser un "MASK" transparent pour pouvoir utiliser les icons du "tray".
Allors voila, jai besoin d'aide. J'ai pas l'habitude de demender la charitée mais je fait une exception.Une fois complet je publirais mon project sur vbfrance.com
Si il y a quelqun qui connais bien vb6 et vb.net et qui veut bien traduire ce que jai besoins (surtout ce qui ce trouve dans common.bas)
jai seulement besoin de la liste des icones et son hWnd.
ou si qq1 a vb6 et qui veut bien me compiler un DLL contenant les function/sub/type(structure) qui suporte COM si posible
merci je laisse mon e-mail pour me rejoindre
retirez l'antispam("antispam-")
antispam-rnsoft_projects@hotmail.com
MadM@tt
Messages postés2167Date d'inscriptionmardi 11 novembre 2003StatutMembreDernière intervention16 juillet 20091 20 août 2006 à 02:17
Arf désolé, j'avais pas relancé le projet... J'étais à 2 doigts d'abandonner
ça marche nickel ;)
MadM@tt
Messages postés2167Date d'inscriptionmardi 11 novembre 2003StatutMembreDernière intervention16 juillet 20091 20 août 2006 à 02:14
Lorsque je veux appeler les fonctions de ta dll perso, il y a une erreur me disant qu'il ne trouve pas le fichier InterprocessImageList.dll
J'ai bien mis la dll dans le repertoire de mon appli pourtant. Par contre j'ai voulu mettre ton code dans un ocx, c'est peut etre la que ça foire ?
VBGenesis
Messages postés292Date d'inscriptionsamedi 25 février 2006StatutMembreDernière intervention22 février 2009 4 mai 2006 à 18:40
Salut à tous j'aimerais savoir comment on peut faire pour que l'icone de son appli apparaisse dans à coté de l'horloge?
MadM@tt
Messages postés2167Date d'inscriptionmardi 11 novembre 2003StatutMembreDernière intervention16 juillet 20091 26 févr. 2006 à 23:59
Meme sous Vista lol, on peut dire que tu prévois.
En tout cas c'est vraiment exceptionnel tout ça à mes yeux !
ShareVB
Messages postés2676Date d'inscriptionvendredi 28 juin 2002StatutMembreDernière intervention13 janvier 201626 26 févr. 2006 à 23:01
salut,
corrigé pour fonctionner sur NT4, 98, 2000, 2003, XP, Vista...
ShareVB
scelw
Messages postés117Date d'inscriptionmercredi 3 septembre 2003StatutMembreDernière intervention17 février 2007 21 mai 2005 à 21:44
je suis débutant et j'ai un peu de mal... J'aimerais ajouter une fonction (dans le premier module) pour pouvoir cacher/dévoiler l'icône de n'importe quelle application présente dans le systray, mais je ne sais pas exactement comment faire. J'ai essayé de faire des trucs qui ressemblaient grossomodo à "SendMessage hIcon, TB_HIDEBUTTON" mais ça ne marche pas... :(
Pourrais-tu m'aider à écrire cette fonction (qui ne doit pas faire plus d'une ou deux lignes, d'ailleurs)?
ShareVB
Messages postés2676Date d'inscriptionvendredi 28 juin 2002StatutMembreDernière intervention13 janvier 201626 30 déc. 2004 à 20:11
MadM@tt
Messages postés2167Date d'inscriptionmardi 11 novembre 2003StatutMembreDernière intervention16 juillet 20091 5 août 2004 à 23:04
C'est puissant tout ça !!
ShareVB
Messages postés2676Date d'inscriptionvendredi 28 juin 2002StatutMembreDernière intervention13 janvier 201626 1 août 2004 à 16:57
salut
ce code sera bientôt mis à jour pour prendre en compte 9x/ME/2000... cela vient de GethWndTray qui est différent pour 2000 :
Private Function GethWndTray() As Long
Dim hwnd As Long 'handle
'on descend dans la hiérarchie parent-enfant
hwnd = FindWindow("Shell_TrayWnd", vbNullString)
hwnd = FindWindowEx(hwnd, 0&, "TrayNotifyWnd", vbNullString)
'jusqu'à obtenir le handle de la barre d'outils faisant de tray
GethWndTray = FindWindowEx(hwnd, 0&, "ToolbarWindow32", vbNullString)
End Function
sous NT4, je ne sais pas (et je ne peux pas tester)
sous 9x, c totalement différent... (NT4 c peut etre pareil)
ShareVB
phtribaudeau
Messages postés14Date d'inscriptionmercredi 15 janvier 2003StatutMembreDernière intervention16 novembre 2004 30 juil. 2004 à 14:42
ne marche pas sous Wint NT 4 non plus : plante sur l'instruction UBound(ticons) au début du forms. Visiblement, la fonction GetTrayIcons ne fonctionne pas...
A revoir donc.
A++
jmlucienvb
Messages postés129Date d'inscriptionmercredi 24 septembre 2003StatutMembreDernière intervention12 février 2009 26 juil. 2004 à 13:07
30 sept. 2010 à 14:38
Bravo pour ce code qui fonctionne parfaitement sous Windows XP.
Par contre sous Windows 7 impossible d'avoir le menu contextuel quand on fait un clic droit dans le tableau.
On dirait que c'est la fonction PostMessage qui n'est plus reconnue.
Est-ce que quelqu'un à une idée ?
22 déc. 2007 à 12:35
Voici le lien vers la version VB.Net : http://www.vbfrance.com/code.aspx?ID=36280
werdDomain : je ne me rappelé même plus avoir fait une version VB.Net...je vais d'ailleurs la transformer en vrai POO...
ShareVB
20 déc. 2007 à 10:52
a ma grande deception en vb6 :( j'utilise vb.net et je ne connais pas bien les type et la diference de syntax de vb6. De plus je ne dispose pas de visual studio 6... Jai bien observer des similitude mais je suis bloquer a plusieurs points dans la traduction de vb6 à vb.net.
J'ai une application qui remplace la bare des tache mais je doit utiliser un "MASK" transparent pour pouvoir utiliser les icons du "tray".
Allors voila, jai besoin d'aide. J'ai pas l'habitude de demender la charitée mais je fait une exception.Une fois complet je publirais mon project sur vbfrance.com
Si il y a quelqun qui connais bien vb6 et vb.net et qui veut bien traduire ce que jai besoins (surtout ce qui ce trouve dans common.bas)
jai seulement besoin de la liste des icones et son hWnd.
ou si qq1 a vb6 et qui veut bien me compiler un DLL contenant les function/sub/type(structure) qui suporte COM si posible
merci je laisse mon e-mail pour me rejoindre
retirez l'antispam("antispam-")
antispam-rnsoft_projects@hotmail.com
20 août 2006 à 02:17
ça marche nickel ;)
20 août 2006 à 02:14
J'ai bien mis la dll dans le repertoire de mon appli pourtant. Par contre j'ai voulu mettre ton code dans un ocx, c'est peut etre la que ça foire ?
4 mai 2006 à 18:40
26 févr. 2006 à 23:59
En tout cas c'est vraiment exceptionnel tout ça à mes yeux !
26 févr. 2006 à 23:01
corrigé pour fonctionner sur NT4, 98, 2000, 2003, XP, Vista...
ShareVB
21 mai 2005 à 21:44
Pourrais-tu m'aider à écrire cette fonction (qui ne doit pas faire plus d'une ou deux lignes, d'ailleurs)?
30 déc. 2004 à 20:11
pour ceux que ca intéresse, la source de la dll est ici :
http://www.cppfrance.com/code.aspx?ID=28514
ShareVB
5 août 2004 à 23:04
1 août 2004 à 16:57
ce code sera bientôt mis à jour pour prendre en compte 9x/ME/2000... cela vient de GethWndTray qui est différent pour 2000 :
Private Function GethWndTray() As Long
Dim hwnd As Long 'handle
'on descend dans la hiérarchie parent-enfant
hwnd = FindWindow("Shell_TrayWnd", vbNullString)
hwnd = FindWindowEx(hwnd, 0&, "TrayNotifyWnd", vbNullString)
'jusqu'à obtenir le handle de la barre d'outils faisant de tray
GethWndTray = FindWindowEx(hwnd, 0&, "ToolbarWindow32", vbNullString)
End Function
sous NT4, je ne sais pas (et je ne peux pas tester)
sous 9x, c totalement différent... (NT4 c peut etre pareil)
ShareVB
30 juil. 2004 à 14:42
A revoir donc.
A++
26 juil. 2004 à 13:07