PCurrency is a pointer to a Currency variable.

PCurrency = ^Currency;

^Currency PCurrency;