Discussion :

[engi]

bonjour,

dans mon appli, j'utilise une petite fenêtre flottante dont je souhaiterai qu'elle reste OnTop en permanence, mais seulement quand c'est mon appli qui à le focus.
J'ai essayé avec la propriété fsStayOnTop mais dans ce cas, ma fenêtre est OnTop même si l'appli n'a plus le focus.

Une idée ?

[ShaiLeTroll]

A Savoir qu'entre BCB6 et BCB2007, il y a déjà une différence de comportement de fsNormal

J'ai une fenêtre en fsNormal dans mon application (BCB2007)
Dans mon application, elle reste par dessus ma fenêtre principale, la fenêtre principale reste souvent en arrière par rapport aux sous-fenêtres SDI

En BCB6, en fsNormal, la fenêtre principale pouvant s'afficher par dessus une autre fenêtre SDI de l'appli

Ce comportement différent de la fenêtre principal qui reste derrière les fenêtres SDI est assez notable !

Tu peux jouer avec BringToFront()
la fenêtre n'a peut-être pas besoin de rester en permanence par dessus mais uniquement lors d'un affichage (je pense à une fenêtre de log ou de monitoring)

fsStayOnTop, il me semble aussi qu'il y a quelques bizarries de comportement !
Si tu réduis ton application, cela cache même les fsStayOnTop
Si tu passe d'application via ALT+TAB ou en cliquant, effectivement les fsStayOnTop restent visible

Dans TApplication.OnDeactivate, tu pourrais changer le FormStyle à la volée de ces fenêtres, le repasser en fsNormal ou alors forcer un Minimize de l'application
Dans OnActivate, tu rétablis le fsStayOnTop

[engi]

Pour info, j'utilise C++ Builder XE.
J'ai testé ton astuce mais ça ne fonctionne pas.

Plus précisément, ça fonctionne pour le OnActivate, mais pas sur OnDeactivate.
Ce dernier n'a l'air de se produire qu'au minimize , ce qui ne me convient pas.
Donc, au final, ma fenêtre flottante est bien affichée au dessus dans mon appli et si je bascule à une autre appli (par alt/tab ou clic dans la barre des tâches), elle reste affichée OnTop, comme si le OnDeactivate n'était jamais exécuté

[ShaiLeTroll]

Tu peux dans un Timer vérifie si l'application est Active, et cacher la fenêtre à ce moment là !

Sinon, attention, il y a

• TApplication::OnDeactivate - que l'on doit affecter manuellement (pas de menu de l'inspecteur), tu peux utiliser un TApplicationEvents::OnDeactivate qui lui est accessible via l'IDE
• TForm::OnDeactivate, n'est-ce pas celui-là que tu as utilisé ?

TApplication::OnDeactivate avec BCB2007 sur XP réagit :

• Clic sur une autre appli
• Alt+TAB
• Barre des Taches

[engi]

non, non, j'ai bien utilisé Application->OnDeactivate.
comme cette fonctionnalité n'est pas capitale et que j'ai d'autres priorités, je crois que je vais donc classer ça dans la rubrique TODO et je verrai ça plus tard.
merci de ton aide.

[ShaiLeTroll]

Essaye via "TApplicationEvents::OnDeactivate", j'ai testé, cela fonctionne !
Quel OS ?

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//---------------------------------------------------------------------------
void __fastcall TBeginningCPPMainForm::ApplicationEvents1Deactivate(
      TObject *Sender)
{
  for (int i = 0; i < Screen->FormCount; i++)
    if (Screen->Forms[i]->FormStyle == fsStayOnTop)
      Screen->Forms[i]->Hide();
}
 
//---------------------------------------------------------------------------
void __fastcall TBeginningCPPMainForm::ApplicationEvents1Activate(
      TObject *Sender)
{
  for (int i = 0; i < Screen->FormCount; i++)
    if (Screen->Forms[i]->FormStyle == fsStayOnTop)
      Screen->Forms[i]->Show();
}