Código Delphi [-] form1:=tform1.create(self); form1.showmodal;
form1:=tform1.create(self); form1.showmodal;