FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Consulta Formularios
Hola,
Tengo la necesidad de crear en tiempo de ejecución los formularios de mi aplicación los nombres de cada formulario estan almacenado en campos texto, y necesito que cuando el usuario elija que formulario ejecutar, tome el nombre del formulario, lo cree y lo presente, he tenido problemas con los tipos de datos. Agradezco de antemano la ayuda. |
#2
|
||||
|
||||
Hola,
Por el momento se me ocurre algo como lo siguiente:
Con el posible inconveniente de que el formulario "Form2" ha de crearse al comenzar el proyecto, es decir, ha de estar disponible (lo que no quiere decir visible) para poder utilizar el método "FindComponent" de la clase "Application". |
#3
|
|||
|
|||
Gracias
Mil gracias, esta opcion me sirve, ya despues mirare como optimizarla para no tener que crear toas las formas desde el principio
Gracias. |
#4
|
||||
|
||||
Aquí va otra idea:
Para crear el formulario con nombre dado puedes definir el siguiente método en el formulario principal:
Para que esto funcione, el formulario principal debe incluir en el uses, las unidades de los otros formularios, y cada uno de esos otros formularios debe incluir una sección initialization donde registre la clase del formulario:
Es un poco más de trabajo, pero permite iniciar sin tener creados los formularios. // Saludos |
#5
|
|||
|
|||
Solucionado
Bien,
Ya probe esta funcionalidad y es perfecta, mil gracias por la ayuda y la verdad no es muy extensa. Nuevamente Gracias |
#6
|
|||
|
|||
Pero a mi no me funciona, proyecto adjunto
Algo hago mal.
Tengo aqui tres forms. Uno es el principal, los otros dos de prueba. En el principal tengo un ComboBox con los nombres de los forms para poder cargarlos. Todo creo que está como este ejemplo, pero me recoge Nil en el GetClass y por eso no se ejecuta. Algo mal hago, observar que registro, en cada uno de los form las clases, pero algo pasa, por favor, ayuda y muchas gracias. Fernando |
#7
|
||||
|
||||
Tú estás mezclando los dos métodos que se hablaron aquí:
Si haces una traza del programa, notarás que la ejecución logra llegar donde marqué; lo cual quiere decir que sí encontró la clase (GetClass) y sí se trata de un formulario (InheritsFrom). Pero luego es cuando mezclas el otro método, y el condicional falla (FindComponent), y falla por lo que comentó dec: para que funcione, tendrían que crearse los formularios desde el inicio de la aplicación, en el autocreate. Entonces, para que funcione, tendrías que quitar esa parte y dejar el código tal como lo puse yo, o bien olvidarte de mi método y usar el de dec, pero lo esencial es que no mezcles una cosa con la otra. // Saludos |
#8
|
|||
|
|||
Ya me funciona pero.......
Con este procedure me funcionó y aunque todas las respuestas son válidas, espero que este fuera el ejemplo, me funcionó.
procedure Lanza(i:String); var FormClass: TPersistentClass; begin FormClass := GetClass(i); if Assigned(FormClass) and (FormClass.InheritsFrom(TForm)) then with TFormClass(FormClass).Create(Application) do Begin ShowModal; End; End; Pero mi pregunta es: Y el Free o el freeAndNil....? Si el objeto se crea, donde lo libero? Trabajo con QReport y a vece da muchos problemas en este sentido con su Preview, por eso pregunto. El lo crea y lo visualiza, sin problemas, y donde lo destruye?. o es que se autodestruye? Llevo tanto tiempo con Delphi y nunca habia tenido necesidad de trabajar con Clases, perdonen. y Gracias. Saludos Fernando |
#9
|
||||
|
||||
En Delphi, las componentes (clase TComponent y descendientes) manejan el concepto de owner o dueño. El owner de una componente es otra componente, que será la encargada de destruirla cuando ella misma se destruya. En otras palabras, cuando una componente se destruye, se lleva consigo a todas las componentes que posea.
La asignación del dueño, se hace al momento de crear una componente, mediante el parámetro Owner del constructor. En este caso en particular, las ventanas la estás creando con
de manera que estás indicando que el objeto Application será el dueño del formulario. Entonces- según lo dicho arriba -cuando el objeto Application se destruya, él se encargará de destruir a los formularios que posea. El código de la VCL se encarga de destruir el objeto Application al terminar la ejecución, así que por ahí no hay problema. Ahora, esta técnica pudiera tener el inconveniente de que todos los formularios que crees durante la ejecución de tu aplicación, estarán ocupando memoria, aun cuando ya no los uses. Si quieres liberarlos antes de que termine la aplicación, entonces basta que en el evento OnClose del formulario pongas
Esto indica al formulario que se "autodestruya" luego de cerrarse. // Saludos |
#10
|
|||
|
|||
Ufff, yo otra vez, me faltaba que...
Lo quiero hacer con Reportes del QReport, pero de los que se sacan directamente, no de la forma en que estan casi todos los ejemplos de que uno pone un form y luego el componente, sino desde Files/New/Report.
Estos, no me dicen del tipo que es y se me traba, alguna sugerencia? Saludos nuevamente y muchas gracias. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Consulta sobre formularios | Gustavo Gowdak | OOP | 1 | 15-03-2007 16:38:22 |
Consulta acerca del manejo de formularios | ilichhernandez | OOP | 4 | 24-11-2006 23:23:37 |
Formularios en PHP | Churi | PHP | 8 | 15-11-2005 20:19:24 |
Consulta sobre Formularios | Gustavo Gowdak | OOP | 2 | 09-12-2004 19:40:44 |
consulta sobre formularios | acertij022 | Varios | 1 | 01-08-2003 16:17:26 |
|