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;