Discussion :

[[Silk]]

salut à tous,
Comment je pourrais faire pour qu'à la fermeture de ma fiche mon processus reste toujours actif ?
Du genre on "délie" le processus de la fiche...
J'arrive à faire juste le processus ( sans fiche) mais quand il y a une fiche à afficher et à fermer le processus ce ferme avec la fiche...

merci d'av

Silk

[sjrd]

Tu peux faire cela en implémentant comme suit le gestionnaire d'événement OnClose de ta fiche principale :

Code :

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

1
2
3
4
procedure TForm1.FormClose(Sender: TObject; Action: TCloseAction);
begin
  Action := caHide;
end;

Cela cachera la fiche plutôt que de la détruire. Or l'application se termine lorsque la fiche principale est détruite.

[Reisubar]

Que veut tu faire de particulier une fois ta fiche détruite ?

[[Silk]]

une fois ma fiche détruite je veux pouvoir continuer à effectuer des taches mais en arrière plan invisible pour l'utilisateur. Comme par exemple quand on ferme la fenètre la fenetre principale d'msn messenger et que l'icone du systray est toujours présente.
je vais essayer ce qu'a dit sjrd et si sa me va c'est bon

Silk

[[Silk]]

j'ai testé ce que tu ma dis sjrd mais le processus est toujours lié à la fiche ce qui fait que tout ce ferme en meme temps.
tu n'aurais pas une autre idée ?

Silk

[[Silk]]

Sinon j'ai pensé "cour-circuiter" l'action de fermeture, j'ai essayé "Exit"
puis ensuite cacher la fiche mais sa ne marche pas, l'application sa ferme malgrès le exit. Il doit bien y avoir un moyen quand même ?

[Pierre Castelain]

Dans une appli Delphi de base, le dpr contient ceci :

Code :

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

1
2
3
4
5
6
 
begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

La gestion de la fenêtre principale est faite dans Application.Run. On voit bien qu'il n'y a plus rien après. Donc il te suffit de modifier cette gestion pour faire tourner ton "processus".
Autre solution : utiliser une fenêtre principale invisible :

Code :

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

1
2
3
4
5
6
7
8
 
begin
  Application.Initialize;
  Application.ShowMainForm:= false;
  Application.CreateForm(TFormInvisible, FormInvisible;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

[[Silk]]

Salut,
sa merche impec ta méthode Pierre je vais la garder pour l'instant à défat d'en trouver une mieux

merci

Silk