Problem beim kopieren von Pointerinhalten

[Wusel]

Aloha an alle
ich hab da ein kleines Problem beim kopieren von Pointerinhalten

Hier erstmal der Codeausschnitt

Delphi-Quellcode:

type
  TWSIconImage = packed record
    pbmpHeader : PBitmapInfo;
    pImg : Pointer;
  end;

procedure ...
var pHeaderDest : PBitmapInfoHeader;
    fWSIconImgXOr : TWSIconImage;
    ...;
begin
  ...
  Move(pHeaderDest, fWSIconImgXOr.pbmpHeader, SizeOf(pHeaderDest));
  ...
end;

In dem obigen Beispiel kopiert es ja nur die Zeigeradressen und somit sind Änderungen in pHeaderDest auch wirksam auf fWSIconImgXOr.pbmpHeader
Bei
Move(pHeaderDest^, fWSIconImgXOr.pbmpHeader^, SizeOf(pHeaderDest^)); bekomm ich 'ne Exception.

Gibt es eine Möglichkeit, dass ich wirklich nur den Inhalt des Pointers übergebe und nicht die Adresse?
Wäre wirklich sehr dankbar für eure Hilfe, aber manchmal hat man irgendwie ein Brett vorm Kopf


Wusel