Discussion :

[FredericB]

Bonjour,

J'ai une application avec une Form principale Form1. Depuis cette Form, j'ouvre d'autres Forms en dynamique (form2, form3, form4, etc...). En fait je developpe un post-it virtuel.
Sur ces forms, il y a une alarme. Quand cette alarme se declenche cela affiche la form correspondante a l'ecran par dessus toutes les autres fenetres de mon bureau. Jusque la pas de probleme, j'utilise SetWindowPos() et SetForegroundWindow().
Mais quand la fenetre s'affiche au premier plan, ca affiche egalement toutes les fenetres de mon application. Ou quand je clique sur une des fenetres, cela affiche egalement toutes les fenetres de mon application.

Donc ma question est : Comment faire pour avoir seulement ma form selectionnee qui s'affiche en premier plan (soit en l'activant ou soit par l'alarme) sans que les autres fenetres de mon application s'affichent egalement au premier par rapport aux autres fenetres du bureau ?

Merci
Fred

[kmaniche]

Je ne vois qu'une seule solution :

1- Mettre << Visible >> de toutes les fiches de ton application à << false >>,

2- Tu ne fais activer que celle qui t'intéresse.

Je pense à deux fonctions :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
HideAll() 
{
   Form1 -> Visible = false ;
   ...
   ...
}
 
ShowOne(TForm *pForm) 
{
   pForm -> Visible = true ;
}

Sinon, regarde dans les propriété de TApplication si il existe une méthode qui permet de te retourner la liste des forms utilisées dans ton projet, là c'est encore plus simple

[FredericB]

J'y est pense, mais je ne veux pas cacher mes autres fenetres. Car se sont des post-it sur le bureau.

[kmaniche]

Est-ce que tu utilise :

Code :

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

1
2
taForm -> ShowModal() ;

[FredericB]

Non, toutes mes forms sont ouvertes avec form->Show();
Ce doit etre possible a faire, car j'ai deja vu une application faire ceci.
J'ai meme essaye de mettre NULL en parametre au lieu de Application quand je cree ma form, mais sans succes.

[kmaniche]

Je pense que c'est due à barre des taches. Si tu clique sur une fenêtre, c'est l'ensemble de ton application qui est activée.

Je me rappelle d'un code dans la FAQ ou sur la page source, qui permet de faire afficher pour chaque fenêtre de ton application, son icône respective dans la barre des tâches.

Regarde l'exemple, peut être ça pourra marcher !

[FredericB]

Desole, mais je n'ai rien trouve dans la FAQ ou dans les sources.
C'est bien dans la FAQ / Sources pour builder ?
Est-ce que tu te rappelles du nom du code ?

[kmaniche]

Genre, comment affiche les fenêtre du projet sur la barre des taches ?

[henderson]

Salut !

Une simple idée ... sans avoir creusé d'avantage !

Soient deux exécutables : un principal qui génère autant de secondaires que nécessaire.
Sans doute avec ShellExecute.

A plus !

[FredericB]

Salut,

henderson, cela peut etre une bonne idee. Je vais approfondir....

[kmaniche]

Dans ce cas, utilise plutôt des fiches déclarées dans un fichier DLL, et tu fais l'appelle directement de ton fichier principale

Une idée à développer >>

[FredericB]

Salut,

Exact kmaniche, je vais approfondir cette idee.
Merci a tous les deux pour vos idees.

Mais cela doit etre faisable dans la meme application. Le logiciel de 3M, le fait. Je ne pense pas qu'ils utilisent une dll ou appli externe.
(http://www.3m.com/us/office/postit/d...tal_notes.html)
Comment ont-ils fait ca ?

[kmaniche]

Ils définissent pour chaque fenêtre de l'application un bouton dans la barre des tâches de Windows. J'ai pas eux pour faire une recherche avec l'api de Windows, surement la solution est quelque part par là

[FredericB]

Salut,

Bon, j'ai enfin reussi a faire ce que je voulais. J'ai refait mon projet avec une dll pour afficher mes fenetres, et du coup elles sont bien independantes. J'ai rajoute dans le OnCreate de la fiche ceci pour enlever les boutons de la barre des taches :
SetWindowLong(Application->Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW);

Mais j'ai encre un petit truc. Du coup ma form n'est plus transparente,
malgre TransparentColor a true de la form. Je pense que c'est a cause de WS_EX_TOOLWINDOW.
Une idee pour avoir la couleur de transparence sur la form ?

[kmaniche]

Le fait que tu redéfinisse par toi même les propriétés de la fiche que tu crée directement de la DLL moyennant :

Code :

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

1
2
 
SetWindowLong(Application->Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW);

Cependant, il est logique que tu redéfinisse la propriété de transparence :

Code :

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

1
2
3
 
#define LWA_ALPHA 2
typedef BOOL (WINAPI* SLWA)(HWND, COLORREF, BYTE, DWORD);

Le code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
SLWA SetLayeredWindowAttributes = 0;
HMODULE hDLL = GetModuleHandle("USER32.DLL");
SetLayeredWindowAttributes = (SLWA)GetProcAddress(hDLL, "SetLayeredWindowAttributes");
if(SetLayeredWindowAttributes == 0) ;
 
DWORD dwStyle = GetWindowLong(Handle, GWL_EXSTYLE);
 
dwStyle = dwStyle | WS_EX_LAYERED;
 
SetWindowLong(Handle, GWL_EXSTYLE, dwStyle);
 
 SetLayeredWindowAttributes(Handle, 0, 128 /*degré de transparence */, LWA_ALPHA);

Handle est celui de la fenêtre que u viens de créer.
Tu peux le replacer par :

Code :

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

1
2
 
laForm -> Handle ;

[FredericB]

Salut,

Merci pour ton code, c'est parfait.
Encore une derniere question si tu peux m'aider.
Avant j'utilisais la fonction Application->OnDeactivate pour savoir quand ma fenetre n'avait plus le focus. Maintenant que j'utilise mes forms dans une dll, je n'ai plus access a cette fonction et donc je n'arrive plus a detecter la perte du focus quand je passe de ma form a une autre fenetre par exemple Word ou Excel.
Une idee ?

Merci

[kmaniche]

Quand tu crée une fiche à partir du fichier dll, tu sauvegarde son Handle dans une variable. Le mieux serait de la mettre dans un vecteur, où le nombre d'éléments du vecteur est celui du nombre de fenêtres crées.

Maintenant, tu ajoutes par exemple un TTimer qui vérifie chaque composante du vecteur, donc le Handle de chaque fenêtre si elle a le focus .

Je ne sais pas si j'étais assez claire

[FredericB]

Salut,

J'ai enfin resolu mon probleme.
Merci beaucoup du coup de main.

[kmaniche]

Qu'as-tu fais pour résoudre ton dernier problème ? Cela pourra peut être aider d'autres développeurs dans le future.
Il faut veiller à laisser une trace

[FredericB]

Salut,

Pour savoir si je perd le focus en changeant d'application, j'ai mis ce code dans le constructeur de l'application principale (alors qu'avant ce code etait dans les forms qui etaient appelles par la dll) :

Code :

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

1
2
 
Application->OnDeactivate = AppDeactivate;

et dans :

Code :

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

1
2
3
4
5
 
void __fastcall TFrm_Main::AppDeactivate(TObject *Sender)
{
   //ici je fais mon traitement
}