Álvaro Vieira wrote:

> Existe alguma forma de listar as propertys de um objeto que deriva de 
> TObject, como a classe abaixo?
> 
> TPessoa = class
> private
>    FId : Integer
>    FNome : string;
> public
>    property Id : Integer read FId write FId;
>    property Nome : string read FNome write FNome;
> end;

Faça com que a classe descenda de TPersistent, coloque as propriedades 
na área published e use typinfo.getproplist. O problema é que as 
procedures da unit typinfo são meio complicadas de usar.

--
João Morais

Responder a