Re: Iconisation, systray et cie...
Posté par drcharly93 le 16/9/2004 20:07:04
Bonjour Thernius,
Mise en place de la méthode
Cette méthode nécessite l'utilisation d'un bouton
Exemple : cmdIconise
Dans Déclarations Globales de la fenêtre
Dans le code du bouton cmdIconise qui va faire disparaitre la fenêtre
Créer une procédure "SysIconisation"
Dans le code de changement de taille de la fenêtre
Voilà
Mise en place de la méthode
Cette méthode nécessite l'utilisation d'un bouton
Exemple : cmdIconise
Dans Déclarations Globales de la fenêtre
GLOBAL
fg_bIconise est un bolean = Faux
Dans le code du bouton cmdIconise qui va faire disparaitre la fenêtre
SysIconeAjoute(<Fichier icone>,"",<Message de survol> ,"SysIconisation")
fg_bIconise=Vrai
<Nom de la fenêtre>..Visible=Faux
Créer une procédure "SysIconisation"
Pocédure SysIconisation(pTypEvent)
SELON typEvent
CAS 513 //Clic gauche enfoncé
fg_bIconise=Faux
SysIconeSupprime()
<Nom de la fenêtre>..Visible=Vrai
CAS 514 // Clic Gauche releve : WM_LBUTTONUP
CAS 515 //double clic Gauche : WM_LBUTTONDBLCLK
CAS 516 //clic droit enfoncé
CAS 517 //Clic droit releve : WM_RBUTTONUP
CAS 518 // double clic droit : WM_RBUTTONDBLCLK
CAS 519 //Clic Milieu enfonce : WM_MBUTTONDOWN
CAS 520 //Clic Milieu releve : WM_MBUTTONUP
CAS 521 //double clic Milieu : WM_MBUTTONDBLCLK
FIN
Dans le code de changement de taille de la fenêtre
SI fg_bIconise alors <Nom de fenêtre>..Visible=(PAS <Nom de fenêtre>..Visible)
Voilà
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=12&topic_id=1303&post_id=5341