Ver Mensaje Individual
  #3  
Antiguo 30-05-2007
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - Espańa
Posts: 18.307
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Junto con lo que tienes en la página, te adjunto un ejemplo, que busca en todos los componentes del formulario aquellos que tienen asignada la porpiedad DataSource y para los que la tienen te da el nombre del componente.

Usa dos funciones:
function ExistProp(Instance: TObject; const PropName: string):Boolean;
function GetPropAsObject(AObj: TObject; const PropName:String):TObject;
Archivos Adjuntos
Tipo de Archivo: zip RTTI - GetPropAsObject.zip (5,1 KB, 32 visitas)
__________________
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.
Responder Con Cita