MaxValue: Currency;
The MaxValue property returns the maximum value of the Currency type.
Sub UserProc;
Var
c: Currency;
Begin
c := Currency.MaxValue;
End Sub UserProc;
After executing the example the "c" variable contains the maximum value of the Currency type, that is, the value 922337203685477.5807.
See also: