Ler endereço de ponteiro

Delphi

27/08/2009

Olá,
Gostaria de mostrar na tela o endereço de um ponteiro. Como faço isso?

Exemplo:

var pt: Pointer;
begin
// Seleciono o endereço que me interessa
pt := @Form1; // Endereço = $0456B3, por exemplo

// Isso não funciona
showmessage(IntToStr(pt));
end;



Rtava

Rtava

Curtidas 0

Respostas

Rtava

Rtava

27/08/2009

Já descobri:
aa: string;
begin
   aa := Format(´¬p´, [@form1]);
   showmessage(aa);
end;

Se alguém souber de uma alternativa tb agradeço.


GOSTEI 0
Rodc

Rodc

27/08/2009

Assim não funciona?
showmessage(IntToStr(@pt));



GOSTEI 0
POSTAR