Código Delphi [-] //En el OnClose liberas con FreeAndNil procedure TForm2.FormClose(.....); begin FreeAndNil(Form2); end; //Y en la llamada a tu MDIChild if Not Assigned(Form2) then Form2:=TForm2.create(Self);
//En el OnClose liberas con FreeAndNil procedure TForm2.FormClose(.....); begin FreeAndNil(Form2); end; //Y en la llamada a tu MDIChild if Not Assigned(Form2) then Form2:=TForm2.create(Self);