acceso a las propiedades de un objeto

[[Al González]]

¡Hola!

No sé si aún es tiempo, pero mi sugerencia sería apoyarte en la función GetPropValue, si es que las propiedades a comparar son publicadas.

Código Delphi [-]
Uses
  TypInfo;

procedure TForm1.Button4Click(Sender: TObject);
begin
  If GetPropValue (Button1, 'Caption') =
  GetPropValue (Button2, 'Caption') Then
    ShowMessage ('Button1 y Button2 tienen el mismo texto.');

  If GetPropValue (Button2, 'Caption') <>
  GetPropValue (Button3, 'Caption') Then
    ShowMessage ('Button2 y Button3 tienen textos diferentes.');
end;

Anexé un archivo con el ejemplo completo.

Saludos.

Al González.