Menu Principal

[Adrian Martinez]

Buenas gente! Desde ya se agradece cualquier ayuda .

Bien el tema es el Siguiente:
Tengo un formulario Principal (MdiForm) con varios controles como dxRibbon, ActionManager, Backstage, ect... en este Principal se Puede Ver o ejecutaran multiples formularios MDIChild al Mismo tiempo.
Cuando creo el primer MDIChild los controles se asignan automaticamente, hasta ahi todo marcha bien, pero cuando ejecuto el segundo formulario los controles solo quedan para el primero, y hasta que no lo cierre, no funcionan para el segundo.

Pregunta: ¿Como puedo liberar los controles del MDIForm cada vez que se activa o desactiva un MDIChild, sin destruir o cerrar la ventana MDIchild Propiamente Dicha?

PD: Soy nuevo trabajando con delphi, tal vez sea algo facil de solucionar, pero aun no tengo demasiada practica en este entorno.. Gracias Nuevamente! saludos

[Neftali [Germán.Estévez]]

Es difícil saber dónde está el problema sin ver el código que estás utilizando.

Deberías poder crear tantas instancias de un formulario como necesites sin problemas. No acabo de entender qué quieres decir cuando hablas de: "pero cuando ejecuto el segundo formulario los controles solo quedan para el primero", pero parece que el problema está en cómo trabajas con esos controles.

Das pocos detalles para saber dónde puede radicar el problema.

[Adrian Martinez]

Perdon por la falta de detalles! mira, este es el procedimiento que llamo desde el Onactivate y OnDesactivate de los MDIChild, para asignara el DataSource a la Lista de Acciones de mi ActionManager, que controla los botones en el Menu Principal, o sea el MDIForm.

Código Delphi [-]
Procedure SetiarBarra(MyDataSource:TDataSource; bCarga:Boolean);
var i:Integer;
begin
  With FrmMain do
    begin
      if bCarga = True then
        begin
          for i := 0 to ActionManager.ActionCount -1 do
            begin
              if UpperCase(ActionManager.Actions[i].Category)=UpperCase('Dataset')then
                TDataSetAction(ActionManager.Actions[i]).DataSource := MyDataSource;
            end;
        end
      else
        begin
          for i := 0 to ActionManager.ActionCount -1 do
            begin
              TDataSetAction(ActionManager.Actions[i]).OnExecute := Nil;
              if UpperCase(ActionManager.Actions[i].Category)=UpperCase('DataSet')then
                TDataSetAction(ActionManager.Actions[i]).DataSource := MyDataSource;
            end;

        end;
    end;
end;

Al procedimiento lo llamo asi:
Cuando activo el MDICHild (OnACtivate) = SetiarBarra(DSMain, True) //DSMain, es el nombre del DataSet.
Cuando Desactivo el MDICHild (OnDesactivate) = SetiarBarra(Nil, False) //DSMain, es el nombre del DataSet.

Entonces: Cuando activo un MDIChild, el MDIForm se enlaza a su DataSet, pero cuando se Desactiva ese MDIChild, nunca se desenlaza...

Espero haber aclarado algunas de tus dudas! Gracias por responder

[ecfisa]

Hola Adrian.

El nuevo hilo que abriste "Aplicación con Multi-Formularios", realiza la misma consulta con el mismo código que el que habías echo dos días atrás "Menu Principal", motivo por el cuál combiné ambos en el primero.

Si no responden o no te sirven las respuestas recibidas, no habras un nuevo hilo con la misma consulta. Continua preguntando en el hilo inicial que este pasará a encabezar la lista de nuevos temas.

Saludos y gracias por tu colaboración