test si une form existe déjà

Je cré des forms en cliquant sur une ligne d'un Grid
par contre, comment puis je savoir si le nom de la form que je cré n'existe pas déjà, pour éviter un message d'erreur ?

Salut,

Dans une application, j'utilise :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

function IsFormOpen(const FormName : string): Boolean; var i: Integer; begin Result := False; for i := Screen.FormCount - 1 DownTo 0 do if (Screen.Forms[i].Name = FormName) then begin Result := True; Break; end; end;

---

Si le form est déjà ouvert, tu le mets au premier plan (BringToFront) sinon tu le créé.

J'espère que ça répond à ta question.

A+,

Seb.

Merci, c exactement ce que je voulais
:D

De rien :wink:

N'oublies pas de cliquer sur le bouton "Mettre Résolu" en bas à gauche.
Merci :wink: .

A+,

Seb.

oups
dsl

J'aurais plutôt fait ceci:

Code:

---

1 2 3 4

if Assigned(NomDeTaForm) then ShowMessage('NomDeTaForm est bien créée') else ShowMessage('NomDeTaForm n''est pas créée')

---

Non ?