Comunidad Gambas-es

¿cómo podría hacer para que en un ListBox aparecieran todos los formularios de una aplicación?.

Prueba con esto:



Pero creo que sólo sirve si usas MDI o ventanas embebidas, de otro modo sólo "ve" la propia ventana principal o "TopLevel Window".

Y por curiosidad, ¿para qué lo necesitas?

estoy haciendo una aplicación en la que necesito controlar el acceso de los distintos usuarios a los distintos formularios y quiero hacer un formulario para asignar los permisos, por ello, necesito una rutina que me permita seleccionar todos los formularios de la aplicación.

Hola.

¿algo así?

jguardon escribió: [Ver mensaje]

Prueba con esto:

Código: [Descargar] [Ocultar] [Seleccionar]

Código: [Descargar] [Mostrar]

DIM hWindow AS Window

FOR EACH hWindow IN Windows
listbox1.Add(hWindow.Name)
NEXT

Pero creo que sólo sirve si usas MDI o ventanas embebidas, de otro modo sólo "ve" la propia ventana principal o "TopLevel Window".

Y por curiosidad, ¿para qué lo necesitas?

Lo he probado y efectivamente, únicamente me muestra las ventana que tengo abiertas.

necesitaría todos los formularios.

¿alguien sabe como hacerlo?

¿Los formularios los creas en tiempo de ejecución?, o ¿en tiempo de diseño.?

Dentro de tu proyecto hay una carpeta oculta .gambas que contiene unas referencias a todas las clases, módulos y formularios del proyecto. El inconveniente es que están todos en mayúsculas, que están mezclados entre tipos (clases, formularios y módulos) y que aunque consigas llenar el listview mediante alguna rutina que liste el directorio, supongo que no será posible hacerlo nunca más en tiempo de ejecución.

Así que me temo que tendrás que hacerlo a mano, 'hardcoded' como se suele decir...
Un String[] o una colección irían bien o directamente la lista interna del listview.

Siento no poder aportar nada más,

saludos.

abarzuaf escribió: [Ver mensaje]

¿Los formularios los creas en tiempo de ejecución?, o ¿en tiempo de diseño.?

todos los formularios están diseñados previamente y existen cuando se ejecuta la aplicación.

De momento no creo ningún formulario en tiempo de ejecución.

abarzuaf escribió: [Ver mensaje]

Hola.

¿algo así?

Código: [Descargar] [Ocultar] [Seleccionar]

Código: [Descargar] [Mostrar]

PUBLIC SUB Form_Open()

DIM sNombreFormulario AS String

sNombreFormulario = FMain.Name

ListBox1.Add(sNombreFormulario)
END

con esta rutina, Únicamente listo un formulario ¿no?

Entonces deberias hacerlo como dice jGuardon, directamente cargando los nombre al listbox, o en una matriz
¿No te sirve así?