Buscar clases en un TForm.

[[eduarcol]]

Perdon a todos si esto es mas facil de lo que parece, pero no doy con el truco.


Necesito saber en un momento dado todas las clases TForm que posea mi proyecto, para buscar dentro de ellas un grupo de propiedades.

Alguien tiene una idea de como puedo hacer esto??, saber en un momento dado todas las clases TForm??

la verdad es que no se si me explico.

[[Delphius]]

Hola Eduardo,
Estuve pensando en tu pregunta... ¿Debe pograparge por la herencia?

Por ejemplo... si tu tienes 4 TClientes y todas descienden de TForm entonces ¿debería listaste 4 TClientes?

¿Lo que buscas es implmentar RTTI?

Estoy pensando en ello...

Saludos,

[[eduarcol]]

algo asi necesito, yo a los TForm les agrego un grupo de propiedades, ahora cuando abra la pantalla de usuarios me va a mostrar un TreeView con el arbol del menu, y cuando le de a la opcion del menu que abre me muestre el grupo de propiedades que serian acceso de usuarios, esto lo hago para que cuando agregue un nuevo formulario al sistema no tener qe actualizar la tabla de usuarios ni la pantalla, que todo sea dinamico

[[Delphius]]

¿No necesariamente deben estar creados? Por que sólo consigo acceder a los que están creados amigo....

La verdad es que no recuerdo como se puede acceder a la lista de todos los TForms que contenga la aplicacción.... estén o no creados...

Por el momento tengo esto:

Código Delphi [-]
for i := 0 to Application.ComponentCount - 1 do
   ListBox1.Items.Add ( TForm(Application.Components[i]).ClassName);

Dame un tiempo y lo saco

Saludos,

[[Delphius]]

Y ahora que lo veo... ese método Lista a THintWindow

Si sólo es necesario los creados creería que bastaría con recorrer el arreglo Screen.Forms. Y hacer el moldeo de tipos, por las dudas...

Saludos,

[[eduarcol]]

Es que ese es el problema, es posible que en el momento que necesite la lista no este creado ninguno, solo el de la configuracion de los usuarios.

Bueno si necesitas tiempo, con gusto te doy 5 minutos no tardes