Ce code permet de lister les icones du "Tray" à côté de l'horloge et de savoir à quel programme une icone appartient...
Pour ME/2000/XP :
C'est une interprétation des données systèmes de cette barre d'outils (le Tray a la classe "ToolbarWindow32") que l'on peut obtenir avec le message TB_GETBUTTON...
Pour 9x :
C'est une interprétation de la structure pointée par le pointeur (lol) que l'on obtient avec GetWindowLong(index=0)
Ce code doit fonctionner sous 9x/ME/NT/2000/XP... Il a été testé sous 98/2000/XP...
La dll jointe dans le zip est nécessaire pour transférer les icones du Tray dans notre processus...
Conclusion :
Ce code fonctionne même lorsque l'option "Masquer les icones inactives" est activée (XP)
N'hésitez pas à commenter et à noter...
20/10 !!
+200 ne sert à rien, j'avais mis ca pour tester GetItemAt...
ShareVB
LV.GetItemAt(X,Y);
et
LV.GetItemAt(X + 200,Y);
en cherchant je trouve ceci :
"We call the GetItemAt method of the ListView to get a pointer to the ListItem on which the user clicked, so we call the associated application for the file."
donc item serait un pointer sur la LV ?
et ensuite pourquoi "+200" ?
merci :)
pour ceux que ca intéresse, la source de la dll est ici :
http://www.cppfrance.com/code.aspx?ID=28514
c'est avec cette dll que je récupère les icones :
hDesktop := GetDesktopWindow();
hImageList := SendMessage(hDesktop, LVM_GETIMAGELIST, LVSIL_SMALL,0);
//iImage de l'item du listview du bureau
hIcon := GetIcon(hDesktop, hImageList, iImage);
ShareVB
J'ai vu ton programme sous vb
D'après la description il fait la même chose que la source que j'ai déposé en delphi et qui est en deux parties
Ce qui m'interessait dans ton programme c'est d'extraire les icones vus sur le bureau
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.