METTRE SON APPLICATION DANS LE SYSTEM TRAY LORSQU'ON LA MINIMISE

Signaler
Messages postés
4297
Date d'inscription
samedi 19 janvier 2002
Statut
Modérateur
Dernière intervention
9 janvier 2013
-
Messages postés
165
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
16 février 2011
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/12250-mettre-son-application-dans-le-system-tray-lorsqu-on-la-minimise

Messages postés
165
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
16 février 2011

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

Par

NotifyStruc.hIcon := LoadIcon(HInstance, 'MAINICON');
Messages postés
1
Date d'inscription
samedi 22 mai 2004
Statut
Membre
Dernière intervention
23 mai 2004

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
Messages postés
32
Date d'inscription
vendredi 10 janvier 2003
Statut
Membre
Dernière intervention
10 mai 2008

j'aimerai bien avoir la version complette
je suis relatuivment débutant et cela dépasse mes compétances
merci @+
Messages postés
1
Date d'inscription
mercredi 1 janvier 2003
Statut
Membre
Dernière intervention
4 janvier 2003

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
Messages postés
4297
Date d'inscription
samedi 19 janvier 2002
Statut
Modérateur
Dernière intervention
9 janvier 2013
29
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 .

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.