Problemas con MDI

[mcsebas]

Hola yo de nuevo, resulta que quiero terminar un pequeño programa del tipo MDI y tengo todos los forms en su respectiva forma osea el padre con sus hijos.
El hecho esta en que arranca el programa y me aparecen todos los hijos y ademas cuando los quiero cerrar se minimizan como hago para evitar todo esto.

Gracias.

[[enecumene]]

Hola, solo debes poner todos los formularios hijos en Alvailable Forms en la paleta Projects / Options. Y lo de cerrar las ventanas hijas debes poner en el evento OnCLose de cada uno lo siguiente:

Código Delphi [-]
Action := caFree; //LIbera de la memoria

Saludos.

[*Caro*]

Hola mcsebas, como te dice enecumene debes quitar todos los formularios hijos del autocreate y despues cuando los necesites los creas manualmente.

Código Delphi [-]
 Form2 := TForm2.Create(Application);
 Form2.Show;

Saluditos

[mcsebas]

Hice como me dijiste, si bien la instruccion para cerrar los FormChild funciona cuando quiero volver abrirlos me salta error y se detiene la ejecución.

Gracias

[[enecumene]]

Empezado por mcsebas

Hice como me dijiste, si bien la instruccion para cerrar los FormChild funciona cuando quiero volver abrirlos me salta error y se detiene la ejecución.

Gracias

Estas llamando los forms como Caro te lo habia sugerido?, si no es asi muestranos el codigo de como los estas llamando.

Saludos.

[[Delphius]]

Empezado por mcsebas

Hice como me dijiste, si bien la instruccion para cerrar los FormChild funciona cuando quiero volver abrirlos me salta error y se detiene la ejecución.

Gracias

Hola mcsebas, ¿Y cual es el famoso error?
mcsebas, Si te produce error, debes indicarnoslo. Sino tendremos que estar adivinandolo.

¿Podrías mostrarnos el código que empleas para crear los forms?

Saludos,

[mcsebas]

Ahora si me funciona che, pero esta bien esta implementacion?

Código Delphi [-]procedure TfrmPrincipal.mClientesAltaClick(Sender: TObject);
begin frmAlta:=TfrmAlta.Create(Application); frmAlta.show end;


Gracias son muy atentos, sinceramente.

[mcsebas]

Ahora si me funciona che, pero esta bien esta implementacion?

Código Delphi [-]procedure TfrmPrincipal.mClientesAltaClick(Sender: TObject);
begin frmAlta:=TfrmAlta.Create(Application); frmAlta.show end;

Gracias son muy atentos, sinceramente.