Pointer-Adresse (wie in C++) ausgeben

[BloodySmartie]

Hallo zusammen!

Nachdem ich nun schon einige Male unsanft mit dem Kopf auf den Schreibtisch schlug, möchte ich Euch um Rat bitten. In C++ ist es mir ein leichtes, die Adresse, auf die ein Pointer zeigt, ausgeben zu lassen. In Delphi schaffe ich das einfach nicht. Auch mein Kollege schüttelt nur mit dem Kopf.

Unser Pointertyp:

Delphi-Quellcode:

 type PMessage = ^TMessage;
  TMessage = record
    caller: string;
    called: string;
    data: string;
    transactionId: string;
    time: TDateTime;
    server: string;
    mandant: string;
    db_server: string;
    db_db: string;
    text: string;
    short_text: string;
    datacall: string;
    DBConIdx:integer;
    geekPointer:Pointer;
  end;

Wir würden nun gern etwas in dieser Richtung machen:

Delphi-Quellcode:

var pmsg:PMessage;

new(pmsg);
memo1.lines.add('Adresse='+inttostr(pmsg));

Das geht aber nicht. Das kann doch nicht so schwer sein

Hilfe!

[edit=Phoenix]Titel angepasst. Mfg, Phoenix[/edit]