problemas con los fsMDIChild...

[Er_Manué]

Hola,

Estoy haciendo una aplicación MDI, con un formulario mdi, varios child y un par normal. El problema que tengo es que quiero que cada vez que se cree una ventana child se me añada automáticamente al menú principal, dentro de ventana...

Tengo incluido un TActionList con las acciones estandars para las ventanas: cascade,arrange,etc... pero no consigo que se incluya automáticamente las nuevas ventanas...

Asi es como creo las ventanas child, (hay múltiples clases child):

Código Delphi [-]
var
  aux : integer;
begin
  aux := buscaClaseFormulario('TfListadoArticulos');
  if aux = -1 then TfListadoArticulos.Create(Application)
  else self.MDIChildren[aux].Show();
end;

¿ Qué es lo que estoy haciendo mal ? ...o simplemente no estoy haciendo ¿?

Salu2

[[Lepe]]

La propia ventana MDI guarda un listado de todas las ventanas hijas que hay creadas, así que nos ahorramoos buscarlas.

Automáticamente no se añaden, tienes que añadirlas tú.

Código Delphi [-]
var
  I: Integer;
begin
  with frmMdi do
    for I := MDIChildCount-1 downto 0 do
    begin
      NombreVentana := MDIChildren[i].Caption
      ClaseVentana := MDIChildren[i].ClassName;
    end;
end;

saludos

[luisgutierrezb]

casi estoy seguro que tu error es este:

TfListadoArticulos.Create(Application)

para que te las pueda reconocer, la mdichild debe ser descendiente de de la mdiform, asi que debes crearla asi:

TfListadoArticulos.Create(self)

en caso de que la forma donde la creas sea la mdiform

[Er_Manué]

ya sé cual era el fallo... me faltaba asiganar la propiedad windowMenu del formulario mdi principal

asias