Вниз
Скачать: CL | DM;

Региональные стандарты   Найти похожие ветки 

 
igor_m   (2009-11-24 10:10) [0]

Добрый день, как можно программно определить значение "Разделитель целой и дробной части" из панели управления в ярлыке "Язык и региональные стандарты"? Спасибо.


 
zorik ©   (2009-11-24 10:15) [1]

способ 1:
DecimicalSeparator
Его даже изменить можно, но там есть какие-то ньюансы и где-то я читал что этот способ не всегда корректно работает
способ 2: (ламерский)

const
 a = 1.1;
var
 c: char;
begin
 c := FloatToStr(a)[2];


 
Григорьев Антон ©   (2009-11-24 10:27) [2]


> но там есть какие-то ньюансы и где-то я читал что этот способ
> не всегда корректно работает

DecimalSeparator - это внутренняя переменная Delphi. По умолчанию она инициализируется системными настройками, но впоследствии её можно изменить. Так что, если вы используете чужие компоненты без исходного кода, гарантии, что они не изменили DecimalSeparator, нет. Поэтому проверка DecimalSeparator может дать результат, отличный от системных настроек. Системные настройки могут быть получены с помощью функции GetLocaleInfo.

Ещё одна засада состоит в том, что изменение DecimalSeparator влияет только на чисто дельфийские функции типа FloatToStr и Format. А вот преобразования вариантов идут без обращения к этой переменной, поэтому на них изменения её значения не влияет.


 
zorik ©   (2009-11-24 10:32) [3]

То есть, выходит что и FloatToStr(1.1)[2] при определенных условиях может дать неверный результат?


 
igor_m   (2009-11-24 10:38) [4]

Отлично, спасибо.


 
Anatoly Podgoretsky ©   (2009-11-24 10:58) [5]

> Григорьев Антон  (24.11.2009 10:27:02)  [2]

Им уже давно пора объявить эти переменные, как deprecated



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.007 c
15-1257434008
pasha_golub
2009-11-05 18:13
2010.01.17
Транспорт ICQ через Jabber в Миранде


2-1259392755
Kuzmi4
2009-11-28 10:19
2010.01.17
Открыть новую форму, полностью переписав её


15-1258147816
Юрий
2009-11-14 00:30
2010.01.17
С днем рождения ! 14 ноября 2009 суббота


2-1258713886
Andrewtitoff
2009-11-20 13:44
2010.01.17
URL


15-1258234214
Юрий
2009-11-15 00:30
2010.01.17
С днем рождения ! 15 ноября 2009 воскресенье




   Наверх