TryParseCurrency(Value: String; Var Result: Currency): Boolean;
Метод TryParseCurrency осуществляет проверку на возможность преобразования указанного значения к денежному типу в соответствии с настройками региональных стандартов.
Если преобразование возможно, то в переменную Result будет помещен результат преобразования, и метод вернет значение True, иначе False.
Sub UserProc;
Var
CI: ICultureInfo;
B: Boolean;
Cur: Currency;
Begin
CI := CultureInfo.Current;
B := CI.TryParseCurrency("1234,56789", Cur);
End Sub UserProc;
После выполнения примера в переменной «Cur» будет содержаться значение 1234,5679, а в переменной «B» будет содержаться признак удачного преобразования.
См. также: