FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Funcion generica para crear varios forms
Tengo varios forms creados y quiero abrirlos con una funcion generica ubicada en una unit que cree para colocar todos los procedimientos genericos que utilizan los forms en mi aplicacion pero por alguna razon que desconosco la funcion me da un error cuando la ejecuto desde la unit que cree pero si la inserto en un form funciona perfectamente.
Cual puede ser el problema?
Este es el error: Undeclared identifier: 'Self' Uso Delphi 7 Muchas gracias
__________________
Carlos Arevalo MSN Messenger: carlos@arevalo.com.ve |
#2
|
||||
|
||||
#3
|
||||
|
||||
Cita:
Hola jcarteagaf... disculpa mi ignorancia... pero para que sirve esta función (no me digas que es para crear un formulario..... ).... digo tecnicamente que puedo mejorar si lo aplico en un sistema... Salu2
__________________
BlueSteel |
#4
|
||||
|
||||
Pues a mi me evita el tener que escribir:
Simplemente digo MostrarForma(Tfrmventas); Y si necesito saber si el usuario presiono Ok o Cancelar le digo
Imaginate cuantas lineas me ahorro en una aplicación con muchas formas. Tambien tengo este otro procedimiento que me sirve para aplicaciones MDI:
Crea la forma y la muestra, y si ya existe y permito multiples instancias, la muestra. Saludos. |
#5
|
|||
|
|||
Gracias jcarteagaf tu ejemplo me funciona muy bien pero tengo la duda por que de la manera que yo lo hago no funciona?
__________________
Carlos Arevalo MSN Messenger: carlos@arevalo.com.ve |
#6
|
||||
|
||||
Hola Carlos Arevalo,
No tengo Delphi a mano, pero creo que el error está aquí:
Creo que debería ser así:
Ahora yo me pregunto ¿Y para que el parámetro sender? No tengo Delphi a mano... pero que va. Saludos, |
#7
|
||||
|
||||
Independientemente de las soluciones que te han aportado, el error que te da es debido a que el Self, se refiere al elemento actual de la clase; Es decir, si creas un objeto, desde sus métodos puedes hacer referencia a él mismo utiliznado Self.
Este procedimiento no pertenece a ninguna clase, por lo tanto no puedes llamar a Self. No se si me expliqué bien...
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#8
|
|||
|
|||
Gracias Neftali.
Me podrias orientar como declarar la clase para poder utilizar el Self. Yo trate colocando:
Pero no me funciono, no tengo muy claro como debo hacer para declararla.
__________________
Carlos Arevalo MSN Messenger: carlos@arevalo.com.ve |
#9
|
||||
|
||||
Función genérica para crear forms usando TAction
Yo lo hago por medio de un TAction que al agregarlo en el ActionList le pongo el mismo nombre de la forma con prefijo act por ejemplo actMiForma, además en la forma al final del código le agrego
Aunque esto ya lo automatice por medio de un wizard, si te interesa puedes bajar mi demás código de http://sourceforge.net/projects/delfib
Última edición por delfib fecha: 06-05-2008 a las 17:50:59. |
#10
|
||||
|
||||
Cita:
En este caso lo normal para pasarle al parámetro no es Self, sino nil o Application, dependiendo de quieen quieres que sea el "propietario". Tu formulario ya es una clase. Si quieres hacer un "visualizador genérico" no necesitas otra. Basta con crear una función similar a la que has hecho tú. (1º) Como ya te he dicho, olvídate del Self. no lo necesitas. (2º) Si vas a crear tu formulario en ese procedimiento, necesitas pasar como parámetro la clase del constructor, para poder crearlo correctamente; Alguien más arriba ya te ha dado la pista (TfrmClass: TFormClass). A partir de esa clase ya puedes hacer un:
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Como hacer para que una funcion regrese varios valores | jangel_ramirezm | Varios | 11 | 07-03-2008 22:14:49 |
Crear un form fsMDIForm y varios forms hijos | citlalliDgp | Varios | 11 | 07-12-2007 15:13:31 |
funcion genérica para cargar combos | Byfed | Varios | 7 | 08-04-2007 01:14:36 |
Problemas para crear una funcion | fartycl | Varios | 1 | 04-07-2006 19:47:50 |
Función Genérica | radaalvaro | .NET | 0 | 28-06-2006 16:51:29 |
|