Listar forms de la aplicación

[ecfisa]

Hola Luis.

Las primer idea que se me cruzó es ir registrando en una lista los forms en la creación, lo cuál se puede hacer usando TObjectList y unificando la creación en un proceso por ejemplo.

Luego mirando por alguna otra opción encontré esto, mucho mas elaborado, que tal vez te pueda servir: Create and Manage dynamic Forms at Runtime using Class References.

Con Delphi 2010 o +, pareciera que ya existe una opcion con RTTI, como comentan en el mensaje 6 de este hilo: Dynamically list all forms in a project (imposible para mi Delphi 7 )

Saludos

[[Al González]]

Hola Luis.

ecfisa te ha dado muy buen información.

Yo sólo añadiría esta referencia a un caso similar: http://www.clubdelphi.com/foros/showthread.php?t=20261

Ocurrió hace nueve años. Ahora lo matizaría, pero creo que en esencia es una solución factible con tu versión de Delphi.

Un saludo.

[[Luis M.]]

Gracias por responder.
Muy buenos e interesantes los post de ecfisa y del Al Gonzalez.

Se me ha ocurrido una posible solución y me gustaría saber vuestra opinión a ver que os parece.
Hay un fichero que tiene todas las clases de formas de la aplicación o programa. Este fichero es el "programax.dpr"
Los nombres de la clase de forma está escrito entre llaves {}.
Al arrancar del programa, este podría leer el fichero e ir incorporando los nombres de las clases de formas que no existan a la tabla.
Lógicamente renombraría el fichero con otro nombre y extensión.
Es un programa a medida para un tienda, que posiblemente en un futuro pueda ser una cadena o una franquicia.
El cliente quiere ponerle la descripción que él considere oportuna a cada clase de forma (no cambiar el nombre) y
aplicar un nivel de permiso que él considere oportuno.
Como el programa con el tiempo irá creciendo en opciones, de ahí mi dilema de como ir introduciendo las nuevas clases de
forma al apartado de permisos.
Adjunto fichero de imagen.

Muchas gracias por vuestro tiempo y aporte.
Un saludo.

[[Al González]]

No es descabellado distribuir el archivo .dpr junto con el programa ejecutable.

El problema que le veo es que de esa manera tu programa no puede saber cuál es la jerarquía de clases de tus formularios. En cambio, si usas herencia visual (es de suponer que la uses), al registrar tus clases puedes obtener más información sobre cuáles de ellas son formularios de captura, cuáles son formularios de búsqueda, etc.

Código Delphi [-]
If XClaseDeForm.InheritsFrom (TPlantillaFormCatalogo) Then

Saludos.

[[Luis M.]]

Hola Al.
Lo que dices es muy correcto, pero en este caso (por el momento hasta que no lo pida el cliente) no es necesario.
Incluso el fichero .dpr tendré que modificarlo manualmente y quitarles algunas cosas como el login, el data module, etc.
Un saludo.