Durch ein bisschen ausprobieren bin ich auf sowas gekommen... (ich hab keinerlei Erfahrung mit Pointern)
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
test : string;
zeiger : pointer;
begin
try
test := 'Hallo';
zeiger := @test;
showmessage(string(zeiger^));
except
showmessage('Fehler');
end;
end;
Deinen "Zeiger" musst du halt nur anpassen.
Thomas H.