Форум: "Система";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];




Вниз

Как вытащить региональные настройки??? 


filipov   (2001-11-20 17:06) [0]

Уважаемые, подскажите, как получить информацию о настройках операционной системы, а конкретно - о том, какой разделитель целой и дробной части числа используется в системе?



svv   (2001-11-20 17:39) [1]

DecimalSeparato(e)r



GovoRun   (2001-11-20 22:59) [2]

если не гнушаешься использовать чужие компоненты - скачай AHM Library
там есть



Иван Шихалев   (2001-11-20 23:38) [3]

GetNumberFormat - API-шная функция.



filipov   (2001-11-21 08:43) [4]

GovoRun, а где скачать эту AHM Library?

Иван Шихалев.
Если не сложно, нарисуй пример использования функции, а то не могу параметры в нее передать(руки корявые)



filipov   (2001-11-21 09:13) [5]

svv спасибо. Работает.



Могильников Сергей   (2001-11-21 09:35) [6]

В SysUtils есть переменная DecimalSeparator:Char; обозначает разделитель целой и дробной части числа. В своей программе можешь даже принудительно назначить разделитель присвоив этой переменной какой-нибудь символ.
Например:
Project.dpr;
..
Uses
SysUtils, Dialogs;
..
DecimalSeparator := ".";
if StrToFloat("1.123") = 1.123 then
ShowMessage("This is correct!")
else
ShowMessage("This is incorrect!")



troits   (2001-11-21 11:06) [7]

1) На мой взгляд, предыдущий код не совсем верен. При ошибке StrToFloat
генерирует исключение EConvertError, которое и надо ловить.

try
StrToFloat("1.123");
ShowMessage("This is correct!");
except
on EConvertError do
ShowMessage("This is incorrect!")
end;

2) Явно присваивать DecimalSeparator - тоже плохая практика.
Если уж это так необходимо, лучше воспользоваться API - ф-цией SetLocaleInfo.




Форум: "Система";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.04 c
3-79298           Л.Ге                  2002-01-29 12:44  2002.02.25  
IB - поддержка массивов?


1-79388           Lamery                2002-02-08 14:46  2002.02.25  
Паскаль


3-79297           tatk                  2002-01-30 19:16  2002.02.25  
Результат запроса -> в переменную (массив)


1-79368           avr555                2002-02-08 18:22  2002.02.25  
Установка компонента RxLib


1-79339           Fedorenko Igor        2002-02-07 12:23  2002.02.25  
Помогите с проблемой!!! Полоса прокрутки в TreeView