Á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