Discussion :

[bigbagisbigbag]

Bonjour,

Je travaille avec bcb6 sur XP.

Je souhaite connaitre l'evenement qui est declenche quand on passe en mode iconisation a partir d'une forme ou tout chose permettant de savoir qu'on passe en mode iconisation.
Je n'ai pas trouver dans la doc.

Toute aide est la bienvenue!

Jerome

[.:morgoth:.]

Ce que tu appelles iconisation, c'est un Minimize() de la fenetre ?
Une réduction en barre des taches?

[bigbagisbigbag]

Hello Morgoth,

Yeap! C'est ca.

En fait j'ai vu le OnMinimize, mais j'aimerai le commander.
C'est a dire, sans rentre ds trop de details, quand une fiche non modale est minimisee, je souhaite commander toutes les autres vers la minimisation.

[Pylz]

Il s'agit de l'évènement OnMinimize mais il n'est pas associé à une forme en particulier, mais à l'application.

Place un composant TApplicationEvents (onglet Supplément) sur la forme principale et affecte un gestionnaire à OnMinimize...

Si le OnMinimize (ou équivalent...) d'une forme existe, je ne le connais pas (et serait heureux de le connaitre )

voilà c'est tout.

A+

[Pylz]

J'ai retrouvé un vieux code (ce qui explique son aspect 'bricolage') qui permet de faire ce que tu cherche (mais je suis persuadé qu'il doit exister une solution simple, naturelle et élégante...), traduis en builder, voilà ce que ça donne :

Place un Timer et un ApplicationEvent sur la forme principale, ensuite :

dans le OnTimer du Timer :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
        for(int i = 0 ; i < Application->ComponentCount ; i++)
        {
                if(((TForm *)Application->Components[i])->WindowState == wsMinimized)
                {
                        Application->Minimize();
                        Timer1->Enabled = false;
                        break;
                }
        }	
}

Et dans le OnRestore du ApplicationEvent :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
void __fastcall TForm1::ApplicationEvents1Restore(TObject *Sender)
{
        for(int i = 0 ; i < Application->ComponentCount ; i++)
        {
                ((TForm *)Application->Components[i])->WindowState = wsNormal;
        }
        Timer1->Enabled = true;
 
}

Ca marche mais si quelqu'un a une 'vraie' solution, ça m'interresse..

[bigbagisbigbag]

Merci pour cette solution.
J'avais pense a un Timer , mais je ne connaissais pas les ApplicationsEvents.
Ca al'air de bien marcher.
Pour moi, c'est une bonne solution.
Merci BEAUCOUP

Jerome