thonyboy
Messages postés165Date d'inscriptionmercredi 23 avril 2003StatutMembreDernière intervention16 février 2011 13 janv. 2005 à 11:48
Bon j'ai enfin réussi a utiliser ce bout de code.
L'auteur a oublié de dire 2 ou 3 choses :
Il faut ajouter dans la section uses : ShellApi
Ensuite il faut intercepter l'evenement onminize de l'appli, afin d'appeler la procedure quand l'utilisateur réduit l'appli.
Pour cela il faut ajouter a l'évenement OnCreate de la form principale l'appel a la fonction minimize
procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnMinimize := Minimize;
end;
Enfin, mais là ce n'estpas un oubli de l'auteur, si vous preferez simplement utiliser l'icone de l'appli vous pouvez remplacer la ligne :
NotifyStruc.hIcon :=WD_MAIN.Image1.Picture.Icon.Handle;//icone qui apparaitra dans le systray. composant Timage
cs_noichi
Messages postés1Date d'inscriptionsamedi 22 mai 2004StatutMembreDernière intervention23 mai 2004 23 mai 2004 à 10:36
j'ai du mal à utiliser cette source je n'est pas d'erreur pourtant l'application ne se place pas en systray. y'a t'il une source complete pour que je puisse la confronter à ce que j'ai fait
Merci
cs_fidji
Messages postés32Date d'inscriptionvendredi 10 janvier 2003StatutMembreDernière intervention10 mai 2008 10 janv. 2003 à 19:11
j'aimerai bien avoir la version complette
je suis relatuivment débutant et cela dépasse mes compétances
merci @+
djboom84
Messages postés1Date d'inscriptionmercredi 1 janvier 2003StatutMembreDernière intervention 4 janvier 2003 4 janv. 2003 à 12:55
Je viens de telecharger un logiciel de capture de texte et d'ecrans nomé espion mais il ne marche pas,j'aimerai avoir une reponse S.V.P
cs_Delphiprog
Messages postés4297Date d'inscriptionsamedi 19 janvier 2002StatutMembreDernière intervention 9 janvier 201332 18 déc. 2002 à 23:05
Pour ceux qui utilisent la bibliothèque RxLib, rappelons que le composant TRxTrayIcon réalise tout celà en ajoutant de nombresues fonctionnalités (voir démos fournies), le tout très simplement .
13 janv. 2005 à 11:48
L'auteur a oublié de dire 2 ou 3 choses :
Il faut ajouter dans la section uses : ShellApi
Ensuite il faut intercepter l'evenement onminize de l'appli, afin d'appeler la procedure quand l'utilisateur réduit l'appli.
Pour cela il faut ajouter a l'évenement OnCreate de la form principale l'appel a la fonction minimize
procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnMinimize := Minimize;
end;
Enfin, mais là ce n'estpas un oubli de l'auteur, si vous preferez simplement utiliser l'icone de l'appli vous pouvez remplacer la ligne :
NotifyStruc.hIcon :=WD_MAIN.Image1.Picture.Icon.Handle;//icone qui apparaitra dans le systray. composant Timage
Par
NotifyStruc.hIcon := LoadIcon(HInstance, 'MAINICON');
23 mai 2004 à 10:36
Merci
10 janv. 2003 à 19:11
je suis relatuivment débutant et cela dépasse mes compétances
merci @+
4 janv. 2003 à 12:55
18 déc. 2002 à 23:05
Pour info, Ray KONOPKA a publié un article intéressant sur le sujet sur le site Raize.com et plus précisément : http://www.raize.com/DevTools/DelphiByDesign/Articles/DbD50.htm
Les codes sources y sont disponibles.