Ref TObject

Question

Caros colegas, vcs poderiam me esclarecer uma d�vida?
Por exemplo:
var L:TList; i,j:Integer;
begin
L := TList.Create;
i := Integer(L);
j := Integer(@L);
end;

Agora vem a d�vida:
Qual a diferen�a entre i e j ? :shock: :?:

Antecipados agradecimentos !!!

Beppe · Answer

Um valor TObject ou descendente � apenas um ponteiro para o conte�do do objeto. O operador @ pega o endere�o de uma vari�vel ou campo, ent�o I � uma refer�ncia simples, e J � uma refer�ncia dupla. Se vc derefenciar J uma vez, vc ter� o conte�do de L, mais uma vez para ter o conte�do do objeto. O Delphi j� faz o dereferenciamento autom�tico para valores TObject, ent�o fica transparente ao user.

Persist · Answer

Ol� Beppe, obrigado pela resposta.Na verdade utilizo uma classe de conex�o num programa servidor, onde ela precisa retornar �s aplica��es cliente um �Handle� de um objeto TDataset, ent�o o que fa�o: retorno Integer(TQuery) por exemplo.N�o preciso retornar um ponteiro p/ TQuery pq as aplica��es cliente n�o utilizam componentes sql.Minha d�vida era se esse �Handle� de TQuery nunca iria se repetir para cada Query criada....

Beppe · Answer

Pra cada Query criada, Integer(Q) retorna um �inteiro� diferente....

F�rum Ref TObject #243504