type
PtrCard = Cardinal attribute (Size = BitSizeOf (Pointer));
An unsigned integer type of the same size as a pointer.
PtrCard is a GNU Pascal extension.
program PtrCardDemo;
var
a: PtrCard;
p: Pointer;
begin
GetMem (p, 10);
a := PtrCard (p);
Inc (a);
p := Pointer (a)
end.