Como descobrir/converter valor de propriedade com tipo Genérico

  TCampo = class

    FValor: Tipo;

    property Valor: Tipo read FValor write FValor;

    function ExibirValor: String;

  end;

function TCampo.ExibirValor: String;

begin

  // Aqui está o problema, a classe não sabe qual o tipo para fazer uma conversão

  result := ????

end;

var

  sCampo: TCampo;

  iCampo: TCampo;

begin



  sCampo := TCampo.Create;

  iCampo := TCampo.Create;



  sCampo.Valor := 'A';

  iCampo.Valor := 1;

  ShowMessage(sCampo.ExibirValor);

  ShowMessage(iCampo.ExibirValor);

  ...