Discussion :

[azzazzelleio]

Salut
j'ai un problème avec mon application réaliser avec Delphi xe7 a l’exécution l’icône apparait dans la barre des taches .... mais qu'on je fait appel a la deuxième forme l’icône disparaitre de la barre des taches et même qu'on je fait Minimiser elle ce minimise hors la barre des taches .
je ne sais pas si c'est un problème de configuration ou d'un code .
aider moi s'il vous plais

[ShaiLeTroll]

Voir Application.MainFormOnTaskBar normalement à True dans le DPR
Sinon, en général, c'est une action volontaire que masquer l'icone en barre de taches avec un SetWindowLong

[azzazzelleio]

Voir Application.MainFormOnTaskBar normalement à True dans le DPR
Sinon, en général, c'est une action volontaire que masquer l'icone en barre de taches avec un SetWindowLong

merci pour votre réponse
Application.MainFormOnTaskbar est a true
la forme principale est normale mais dans la deuxième fiche que je l’appel avec form2.show; et je masque la première fiche avec form1.hide; sa passe ce problème

[ShaiLeTroll]

et je masque la première fiche avec form1.hide; sa passe ce problème

CQFD : MainFormOnTaskbar
Vous cachez la fenêtre principale et MainFormOnTaskbar est à True ... donc si Hide Main Form alors Hide Button Task Bar
Soit vous le passez à False en perdant des fonctionnalités de l'OS mais bon vu que vous cachez la fenêtre, cela ne sera pas un soucis

Ou alors dans le OnCreate de Form2 vous devez faire un SetWindowLong pour afficher la fenêtre secondaire dans la barre des taches, voir aussi CreateParams qui permet cela aussi

Code :

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

SetWindowLong(Application.Handle, GWL_EXSTYLE, GetWindowLong(Application.Handle, GWL_EXSTYLE) or WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW);

OU

Code :

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

1
2
3
4
5
6
procedure TForm2.CreateParams(var Params: TCreateParams); // override;
begin
 inherited CreateParams(Params);
  Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
  Params.WndParent := GetDesktopwindow;
end;

[azzazzelleio]

@ShaiLeTroll

j'ai rien compris

[sergio_is_back]

C'est tout simple

L'icône dans la barre des taches c'est lié à la propriété "Visible" de ta forme principale.
Si tu cache la forme principale (avec Hide), l'icône n'est plus visible dans la barre des taches.

Le code donné par ShailLeTroll est à placer dans ton Form2.FormCreate et permettra de faire réapparaitre l’icône dans la barre des taches une fois la Form1 cachée

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
 
implementation
 
{$R *.dfm}
 
uses Windows; // Si pas déjà dans tes uses de la section "interface"
 
procedure Form2.FormCreate(Sender : TObject);
begin
     SetWindowLong(Application.Handle, GWL_EXSTYLE, GetWindowLong(Application.Handle, GWL_EXSTYLE) or WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW);
 
     .... Le reste de ton code .....
end;