Fermeture d'une Fiche
Résolu
tleboukaka
Messages postés
79
Date d'inscription
lundi 26 février 2007
Statut
Membre
Dernière intervention
5 mai 2010
-
26 févr. 2007 à 18:22
japee Messages postés 1727 Date d'inscription vendredi 27 décembre 2002 Statut Modérateur Dernière intervention 6 novembre 2021 - 26 févr. 2007 à 21:06
japee Messages postés 1727 Date d'inscription vendredi 27 décembre 2002 Statut Modérateur Dernière intervention 6 novembre 2021 - 26 févr. 2007 à 21:06
1 réponse
japee
Messages postés
1727
Date d'inscription
vendredi 27 décembre 2002
Statut
Modérateur
Dernière intervention
6 novembre 2021
8
26 févr. 2007 à 21:06
26 févr. 2007 à 21:06
Salut,
Sur la fiche frmCon :
uses Unit2; { ou le nom sous lequel tu as enregistré la fiche frm2 }
procedure TfrmCon.btnOKClick(Sender: TObject);
begin
Hide;
frm2.ShowModal; // ou Show, c'est toi qui vois
end;
Sur la fiche frm2 :
uses Unit1; { ou le nom sous lequel tu as enregistré la fiche frmCon }
procedure Tfrm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
frmCon.Show;
end;
Sur la fiche frmCon :
uses Unit2; { ou le nom sous lequel tu as enregistré la fiche frm2 }
procedure TfrmCon.btnOKClick(Sender: TObject);
begin
Hide;
frm2.ShowModal; // ou Show, c'est toi qui vois
end;
Sur la fiche frm2 :
uses Unit1; { ou le nom sous lequel tu as enregistré la fiche frmCon }
procedure Tfrm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
frmCon.Show;
end;
