[Delphi] Jak to zrobic w Delphi (kod C++)

POINT x = (POINT) adres;

czy wie ktos jak mozna zadeklarowac cos takiego w Delphi ?

type PPoint = ^TPoint;

var x:PPoint;
begin
x:=PPoint(adres);