Registrar cada ventana activa en un TActionMainMenubar

[JoseAntonio]

me refiero a crear un menu donde todas los formularios activos se carguen automaticcamente el menu debe estar dentro del mismo actionmainmenubar

[ecfisa]

Hola JoseAntonio.

A ver si es esto...

Poné en el evento OnCreate u OnShow del Form principal lo siguiente:

Código Delphi [-]
   ActionMainMenuBar1.WindowMenu:= '&Ventana';

Donde 'Ventana' sería el título del menu. Debe ir precedido de '&'.


Saludos.

[[ElKurgan]]

También, si lo que necesitas es luego llamar a cada ventana desde el menú, este artículo de Phil Brown, sobre implementación del patrón "factory" para operaciones con menus te puede servir. Lamentablemente, está en perfecto inglés, pero el código es lo suficientemente claro como para ver su funcionamiento

Un saludo

[ecfisa]

Empezado por ElKurgan

También, si lo que necesitas es luego llamar a cada ventana desde el menú, este artículo de Phil Brown, sobre implementación del patrón "factory" para operaciones con menus te puede servir. Lamentablemente, está en perfecto inglés, pero el código es lo suficientemente claro como para ver su funcionamiento

Un saludo

Hola Kurgan, muy interesante el artículo. Gracias por el aporte.

Saludos.

[JoseAntonio]

Empezado por ecfisa

Hola JoseAntonio.

A ver si es esto...

Poné en el evento OnCreate u OnShow del Form principal lo siguiente:

Código Delphi [-]
ActionMainMenuBar1.WindowMenu:= '&Ventana';





Donde 'Ventana' sería el título del menu. Debe ir precedido de '&'.


Saludos.

Gracias che!, pero no funka lo intente en el formshow y en el formCreate que sera? cheko lo del formfactory ...

[ecfisa]

Hola JoseAntonio.

Lo único que se me ocurre que yo haya tenido un error de interpretación y estés haciendo una aplicación SDI.
El código que te pasé funciona si es una aplicación del tipo MDI.

Saludos.

[JoseAntonio]

Empezado por ecfisa

Hola JoseAntonio.

Lo único que se me ocurre que yo haya tenido un error de interpretación y estés haciendo una aplicación SDI.
El código que te pasé funciona si es una aplicación del tipo MDI.

Saludos.

Sip, era SDI, como sea, igual me sirve por que cambiare todo a MDI (Ya hice pruebas), gracias!