Código Delphi [-] If not Assigned(form2) then form2 := TForm2.Create(Self);
If not Assigned(form2) then form2 := TForm2.Create(Self);