Código Delphi [-] if not assigned(Form1) then Application.CreateForm(TForm1,Form1); Form1.show;
if not assigned(Form1) then Application.CreateForm(TForm1,Form1); Form1.show;