Imprimer la valeur d'un pointeur

Question

Bonjour,
A des fins de débogage, je souhaite imprimer la valeur de pointeurs dans un fichier afin de déterminer celui qui pose problème.
Comment fait-on pour transtyper la valeur d'un pointeur en une chaîne imprimable?

beckerich · Answer

bonjour,

regarde la fonction Format. Je crois que %x donne l'adresse d'un pointeur.

Luc.

korgis · Answer

Salut,

Exact, Format le fait, mais c'est '%p'.

f0xi · Answer

Exact, c'est %p !

on peut donc faire ceci :
procedure TForm1.Button1Click(Sender: TObject);
begin
  showMessage(
    format('ptr [%p] = 0x%.8x = %d',[pointer(sender), longword(pointer(sender)), integer(pointer(sender))])
  );
end;

qui affichera :

"ptr [0180EF40] = 0x0180EF40 = 25227072"

________________________________________________________
besoin de câbles audio, vidèo, informatique pas cher ?

beckerich · Answer

bonjour,

ah oui, 
%x affiche en hexadécimal

Luc.

cs_Gerard · Answer

Merci:
Je pense que c'est la solution que je cherchais!
Je ne connaissais pas la fonction format et c'est donc la première fois que je l'utilise!
C'est marrant cela me rappelle  le fortran IV que
j'ai découvert à la fin des années 60..
et que j'avais appris sur le tas comme j'ai fait pour Delphi!

f0xi · Answer

si tu veux en savoir plus :

http://deefaze.ftp-developpez.com/delphi/tutoriels/delphi-la-fonction-format.pdf

________________________________________________________
besoin de câbles audio, vidèo, informatique pas cher ?

Imprimer la valeur d'un pointeur

6 réponses

Votre réponse

Discussions similaires