[abracadabra]

Empezado por seoane

Si la variable ptr es de tipo pointer, prueba con esto:

Código Delphi [-]
ShowMessage('$'+IntToHex(Cardinal(Ptr),8));

Muchas gracias seoane. Siempre estás dipuesto a ayudar y enseñar. Me has salvado en muchas ocaciones y esta no es la excepción. El código funciona a la perfección.