Ver Mensaje Individual
  #1  
Antiguo 20-07-2005
Avatar de moesis
moesis moesis is offline
Miembro
 
Registrado: jun 2004
Ubicación: Islas Canarias
Posts: 46
Reputación: 0
moesis Va por buen camino
Casteo en tiempo de ejecución

Saludos gente,
Hacía tiempo que no pasaba por aquí, pero es que he estado muy liado , a partir de ahora, si los negocios lo permiten, prometo dedicarle más tiempo.

Tengo un problema que seguramente tendrá una solución la mar de sencilla. A ver cuento cual es el problema.

Estoy desarrollando un formulario (TfrmBrowser) genérico para realizar las operaciones básicas de un mabteniemiento (altas, bajas, modificaciones, borrados, etc), este cuenta en su interior con un Panel donde es incrustado el verdadero form (TFormulario) que contiene los datos y métodos necesarios para verificar la integridad referencial, valores, etc.

Ambos formularios descienden de TForm. y TfrmBrowser en su constructor recibe como parámetro de tipo TComponent, el formulario a incrustar.

En el formulario TfrmBrowser, existen dos métodos que incrustan y liberan dicho formulario. En estos métodos se realiza un cast de la forma TForm(m_formulario).propiedad y funciona fenomenal.

El problema surge cuando intento acceder a las propiedades públicas del formulario TFormulario y no son visibles, algo totalmente lógico. He leido que puedo obtener el nombre de la clase base como string, y la clase como un pointer a TClass, pero ¿Cómo podría realizar un cast en tiempo de ejecución para que reconozca los métodos de TFormulario?
Agradecido de antemano,
Un saludo desde Canarias.
__________________
ø¤º° Moesis °º¤ø
Dios nos ha dado dos orejas y una boca para escuchar el doble de lo que hablamos.
Consulta la Guía de Estilo.
Responder Con Cita