Saber si existe propiedad en un componente

[dec]

Hola,

Código Delphi [-]
uses
  TypInfo;

procedure TForm1.Button1Click(Sender: TObject);
begin

  // Utilizando instancias de un objeto
  if TypInfo.IsPublishedProp(Label1, 'Caption') then
    ShowMessage('Label1 cuenta con una propiedad Caption')
  else
    ShowMessage('Label1 NO cuenta con una propiedad Caption');

  // Utilizando el tipo de una determinada clase
  if TypInfo.IsPublishedProp(TLabel, 'Caption') then
    ShowMessage('TLabel cuenta con una propiedad Caption')
  else
    ShowMessage('TLabel NO cuenta con una propiedad Caption');

end;

[genius]

Problema resuelto.. !!
Gracias.. David..

En mi caso seria asi . y lo comparto _ CMCtrlAsociado contiene el name de x control
if TypInfo.IsPublishedProp(Screen.ActiveForm.FindComponent(TEditPers(Screen.ActiveForm.Components[i]).CMCtrlAsociado), 'Text') then Screen.ActiveForm.FindComponent(TEditPers(Screen.ActiveForm.Components[i]).Text := 'XXXX valor'

else //bla bla
if TypInfo.IsPublishedProp(Screen.ActiveForm.FindComponent(TEditPers(Screen.ActiveForm.Components[i]).CMCtrlAsociado), 'Caption') then Screen.ActiveForm.FindComponent(TEditPers(Screen.ActiveForm.Components[i]).Caption := 'XXXX valor'