Adresse eines Array-Feldes ermitteln und anzeigen

[devidespe]

Hallo,

ich habe in meinem Programm ein Array-Feld mit 128 Chars deklariert, wovon ich zur Laufzeit die Speicheradresse ermitteln muss und diese anzeigen lassen möchte. Die Verwendung eines Pointers ermittelt ja die Adresse auf das angegebene Objekt, wie kann ich die Adresse aber für den Anwender verständlich auf dem Bildschirm ausgeben ?

Danke schonmal für die Antworten.

Delphi-Quellcode:

var t : array[1..128] of Char;
    p : Pointer;
begin
  p:=@t;
  ShowMessage('Hier möchte ich die Adresse von "t" hexadezimal ausgeben.');
end;

[Tyrael Y.]

  LString := IntToHex(Integer(p), 2); //???

[Neutral General]

Zitat von Tyrael Y.:

  LString := IntToHex(Integer(p), 2); //???

Da Adressen aber normalerweise 4 Bytes groß sind, würde sich eine 8 als 2. Parameter ganz gut machen

Oder mit Format gehts so:

Format('Die Adresse von t: %.8x',[Integer(p)])

[Tyrael Y.]

Zitat von Neutral General:

Da Adressen aber normalerweise 4 Bytes groß sind, würde sich eine 8 als 2. Parameter ganz gut machen

Natürlich hast du Recht.

Ich habe nicht gelesen worum es ganz genau geht und habe den Sourcecode geschrieben in
der Annahme, daß er die Werte aus seinem Array als Hex dartsellen möchte, diese wären
ein Byte gr0ß gewesen.

Nachträglich habe ich gelesen, daß er die Adresse haben möchte und hab es verbummelt,
daraus eine 8 zu machen. Der zweite Parameter muss natürlich 8 sein.

[Roachford]

Wie? Format() nutzen und dann noch unnötigen Aufwand treiben?

Format('Die Adresse von t: %p', [p])