Criação de formulários MDI


//------------------------------------------------------------

No Form Principal

FormStyle = FsMDIForm
Maximixar

Chamar o Form Filho no OnClik

begin
if no Assingned(FormFilho) then
begin
   FormFilho := TFormFilho.Create(Self);
end;
FormFilho.show;


//------------------------------------------------------------

No Form Filho

Tira ele da memoria;

FormStyle = FsMDIChed;
Visible = true;

Para fechar o formulario, no evento OnClose;

begin
 Action:= CaFree;
 Release;
FormFilho := Nil;