Como crear una forma MDI?

[bustio]

Empezado por squenda

Hola Bustio

Código Delphi [-]
procedure TMain.Razas1Click(Sender: TObject);
begin
  if frm_Razas = nil then 
    begin
      application.CreateForm(Tfrm_Razas,frm_Razas);
      frm_Razas.Show;
    end;
end;

Espero te sirva.

Asi mismo lo hago.. lo unico es que cuando le doy al boton "CERRAR"(X) en la forma hija no se cierra sino que se minimiza y se va a la esquina inferior izquierda de la pantalla.. como hacer para que en verdad se cierre??

[[Lepe]]

En el evento FormClose de la ventana hija, pon: Action := cafree;

saludos