MaxValue: Currency;
Свойство MaxValue возвращает максимальное значение типа Currency.
Sub Main;
Var
c: Currency;
Begin
c := Currency.MaxValue;
End Sub Main;
После выполнения примера в переменной «c» будет содержаться максимальное значение типа Currency, т.е. значение 922337203685477,5807.
См. также: