The Currency data type is intended for monetary values and is a fixed-point data type with a default value of zero (0.0000).

It is fixed at a maximum of 4 decimal places and is designed to reduce rounding errors.

Currency can store a number between -922337203685477.5808 and 922337203685477.5807.  

If you try to store a number in a data type that is unable to fit that number you will receive an Overflow Error.

Declaration: var myvariable : currency;

A stand-alone example follows -

procedure ScriptEvent (var Value : variant);
var
mycurrency : currency;
begin
mycurrency := 98765.1234;
LogInfo('The value of mycurrency is '+FloatToStr(mycurrency));
end;