TryParseCurrency(Value: String; Var Result: Currency): Boolean;
TryParseCurrency(Value: string; Var Result: decimal): boolean;
Value. Значение, приводимое к денежному типу.
Result. Переменная, в которую будет помещен результат в случае удачной попытки преобразования.
Value. Значение, приводимое к десятичному типу.
Result. Переменная, в которую будет помещен результат в случае удачной попытки преобразования.
Метод TryParseCurrency осуществляет проверку на возможность преобразования указанного значения к денежному типу в соответствии с настройками региональных стандартов.
Примечание. В Fore.NET метод TryParseCurrency осуществляет проверку на возможность преобразования указанного значения к десятичному типу в соответствии с настройками региональных стандартов.
Если преобразование возможно, то в переменную Result будет помещен результат преобразования, и метод вернет значение True, иначе False.
Для выполнения примера на Fore.NET добавьте ссылку на системную сборку ForeSystem.
Sub UserProc;
Var
CI: ICultureInfo;
B: Boolean;
Cur: Currency;
Begin
CI := CultureInfo.Current;
B := CI.TryParseCurrency("1234,56789", Cur);
End Sub UserProc;
Imports Prognoz.Platform.Interop.ForeSystem;
…
Public Shared Sub Main(Params: StartParams);
Var
CultCls: ICultureInfoClass = New CultureInfoClassClass();
CI: ICultureInfo;
B: boolean;
Cur: decimal;
Begin
CI := CultCls.Current;
B := CI.TryParseCurrency("1234,56789", Cur);
End Sub;
После выполнения примера в переменной «Cur» будет содержаться значение 1234,5679, а в переменной «B» будет содержаться признак удачного преобразования.
См. также: