Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Formularios MDI, Activar, Listar en el MENU (https://www.clubdelphi.com/foros/showthread.php?t=88215)

RogerOfTheEagle 30-04-2015 18:40:10

Formularios MDI, Activar, Listar en el MENU
 
Estimados Sres. Gracias anticipadas por la ayuda.
En DELPHI, con Form's MDI,
podrían indicarme como activar, mostrar, poner el FOCUS a un formulario HIJO, creado anteriormente.
Tambien: poner en una lista del MENU PRINCIPAL los formularios HIJO abiertas?

Gracias por sus ayudas.

RogerOfTheEagle 30-04-2015 19:33:50

Resuelto,,, No se si sera lo correcto.
Código Delphi [-]
for I := 0 to MDIChildCount - 1 do
        if MDIChildren[i].Caption = FormParaActivar then
          begin
            Break;
          end;
      MDIChildren[i].Show;
y Lo del MENU aun no puedo resolverlo...

ecfisa 30-04-2015 20:45:48

Hola RogerOfTheEagle.

Para tu primer pregunta tal vez te convenga unir la creación y mostrado de los MDIChilds en un solo procedimiento:
Código Delphi [-]
procedure TMDIForm.OpenMDIChild(AClass: TFormClass);
var
  i: Integer;
begin
  for i:= MDIChildCount-1 downto 0 do
    if MDIChildren[i] is AClass then
    begin
      MDIChildren[i].WindowState:= wsNormal;
      MDIChildren[i].BringToFront;
      Exit;
    end;
   with AClass.Create(Self) do
    BringToFront;
end;
Llamada ejemplo:
Código Delphi [-]
...
begin
  OpenMDIChild(TMDIChild1);
end;

Para tu segunda consulta investiga en estos foros sobre la propiedad WindowMenu. También vas a encontrar mucho material en la web.

Por favor, trata de crear un tema por cada consulta a realizar para de ese modo favorecer los resultados de las búsquedas.

Saludos y gracias por tu colaboración :)


La franja horaria es GMT +2. Ahora son las 08:04:56.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi