RosettaCodeData/Task/Pointers-and-references/Delphi/pointers-and-references-7.delphi

IntVar := integer(MyPointer^);