Multiples Ventanas en una Aplicacion
 

Hola

Deseo tener una aplicacion y poder abrir varias ventanas dentro de la misma aplicacion y pasarme de una otra. Creo que es una aplicacion MDI o algo, en fin cualquier contribucion es bien recibida y se los agradezco de antemano...\

Saludos desde CR

Hola,

Puedes empezar por:

O, sencillamente, iniciar un nuevo proyecto:

...y dando a la propiedad "FormStyle" del formulario principal el valor "fsMDIForm". Al resto de formularios (que añadas) a la aplicación cámbiales también la propiedad "FormStyle" a "fsMDIChild".

Pero...
 

Eso hice, pero entonces me abre automaticamente las ventanas, pero yo quiero que uno abra la ventana que desee y no automaticamentes...

Hola,

No puedes ocultar (Visible:=False) formularios "MDI", pero, puedes impedir que se creen cuando se crea la aplicación. Quiere decirse que en cuento se crea un formulario MDI este pasa a ser mostrado, empero, hasta que el formulario no se crea, evidentemente no se muestra.

Echa un vistazo en el archivo del proyecto "*.dpr" y probablemente veas algo como esto:

Código Delphi [-]
begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  //Application.CreateForm(TForm2, Form2);
  Application.Run;
end.

Pues bien, la línea que he comentado puedes y aun debes borrarla, de modo que no se cree el formulario de turno, y por tanto no se muestre.

continuacion...
 

Y no hay forma de poder cerrar esa ventana una vez que esta abierta?

Hola,

¿El formulario hijo? Claro que sí, hombre. Puedes usar su método "Close". En el evento "OnClose" correspondiente tienes que dar un valor al parámetro "Action" que se te pasa por referencia: "caFree", me parece, para "ocultar" el formulario.

PD. No puedes ocultar un formulario "MDI", así que con "caFree" lo liberas al cerrarse, de modo que tendrás que crearlo cuando vayas a mostrarlo de nuevo.

Listo! muchas gracias!

Ventas hijo
 

Yo hago lo siguiene

if frmventanaHija = nil then
frmVentanaHija := TfrmVentanaHija.Create(Application);
frmVentanaHija.Show;

En el evento Onclose de la ventanaHija coloco:

Action := caFree;
frmVentanaHija := nil;

Espero que te ayude