acceso a las propiedades de un objeto

[gushynet]

Hola a todos, tengo una duda a ver si me podeis orientar un poco:

supongamos que tengo una función que pretende comparar dos objetos pasados por parámetro.

La función tiene además un tercer parámetro que es una cadena que indica el nombre de la propiedad común a los objetos en función de la cual se hará la comparación. Sería algo asi:

Código Delphi [-]
function Comparar(Obj1:TObjeto;Obj2:TObjeto;propiedad:AnsiString);
begin      
   if Obj1.propiedad = Obj2.propiedad then         
       result := true      
   else          
       result := false; 
end;

La duda es simplemente si hay alguna manera en delphi de acceder a los campos de un objeto de esta manera.

Gracias de antemano por la ayuda.
Un saludo