Application résidant

Question

Salut,
Voilà j'ai transformer mon logiciel en fenêtre résidant maintenant quand elle se lance elle s'en va dans un icone en bas a droite. Quand je fait clic droit une pop up s'affiche et me laisse le choix entre quitter ou ouvrir fichier.

Et mon problème est là je n'arrive pas à faire le 'ouvrir fichier'. Quitté trés simple:

procedure TForm1.Quitter1Click(Sender: TObject);
begin
    Close;
end;

Mais ouvrir fichier j'ai fait:

procedure TForm1.Ouvrirfichier1Click(Sender: TObject);
begin
application.ShowMainForm:=true;
end;
Mais rien ne se passe ! 

Il faut s'avoir que dans voir la source du projet
j'ai mis: 

begin
  Application.Initialize;
  Application.ShowMainForm:=false;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

Une idée ?

Cirec · Answer

Salut,

essaye:
 

begin
  Show;
end;


[hr]@+Cirec
[hr]

shadow578 · Answer

tout simplement 
Merci mdr ;)

shadow578 · Answer

Par contre quand je l'ai rouvert avec "ouvrir fichier" je ne peut plus le remettre en bas, comment faire pour que quand on appui sur la croix sa ne le ferme pas mais sa le remette en résidant?

Application résidant

3 réponses

Votre réponse

Discussions similaires