Mdi form

cs_aminou
Messages postés
4
Date d'inscription
jeudi 27 novembre 2003
Statut
Membre
Dernière intervention
12 mai 2008
- 23 août 2004 à 00:11
Loulibier
Messages postés
309
Date d'inscription
jeudi 6 juin 2002
Statut
Membre
Dernière intervention
24 septembre 2008
- 23 août 2004 à 08:41
salut
pour crée une fenetre mdi j'utilide
formx:=tformx.create(self);
mais si je click n fois sur un button j'ai n form
comment on fais pour obtenir qu'une seule form
merci

1 réponse

Loulibier
Messages postés
309
Date d'inscription
jeudi 6 juin 2002
Statut
Membre
Dernière intervention
24 septembre 2008
2
23 août 2004 à 08:41
Salut,

Donne un Nom à la Form que tu crées et test si elle existe, si elle n'existe pas tu la crée et sinon tu la fait apparaitre.

  if FindComponent('MaFormMdi') = nil then
  begin
    Formx := TForm.Create(Self);
    Formx.Name := 'MaFormMdi';
    Formx.Show;
  end
  else
    TForm(FindComponent('MaFormMdi')).Show;


Bonne Prog,

Olivier
0