Form dentro Panel MDI aplicacion

[_CALI]

Buenas Noches,

tengo una aplicacion MDI

en el area cliente del formulario principal tengo un panel

muestro un formulario hijo dentro del panel con la siguiente instruccion:

Código Delphi [-]
 FormHijo := TFormHijo.Create(Application);
 winapi.Windows.SetParent(FormHijo.Handle, panel1.Handle);

todo bien, pero cuando cierro el formulario hijo me aparece un error:


Access Violation at Address 73c603e4 in module user32.dll
Read of Address 00000047


el evento Onclose del formulario hijo tengo:

Código Delphi [-]
procedure TFormHijo.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Action := caFree;
end;

como pordria solucionarlo, debo recurrir a setParent de la API, porque el metodo de delphi no me permite crear formularios dentro de
paneles en aplicaciones MDI

Gracias Nuevamente!!

[ecfisa]

Hola.

Empezado por _CALI

...
todo bien, pero cuando cierro el formulario hijo me aparece un error:

Access Violation at Address 73c603e4 in module user32.dll
Read of Address 00000047

el evento Onclose del formulario hijo tengo:

Código Delphi [-]
procedure TFormHijo.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Action := caFree;
end;

...

Trata de este modo:

Código Delphi [-]
...
procedure TFormHijo.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  WinApi.Windows.SetParent(Handle, 0); 
  Action := caFree;
end;

Saludos

[_CALI]

Empezado por ecfisa

Hola.

Trata de este modo:

Código Delphi [-]
...
procedure TFormHijo.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  WinApi.Windows.SetParent(Handle, 0); 
  Action := caFree;
end;

Saludos

Excelente, Muchas Gracias