Sollte so funktionieren:
Delphi-Quellcode:
var
MyPointer: Pointer;
begin
MyPointer := Pointer(StrToInt(Edt1.Text));
end;
Edit: Du könntest allerdings vorher noch mit TryStrToInt prüfen, ob das möglich ist, denn sonst bekommst du eine unschöne Fehlermeldung.