Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2010.01.17;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "Начинающим";
Текущий архив: 2010.01.17;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.005 c
15-1258038799
Медвежонок Пятачок
2009-11-12 18:13
2010.01.17
ASP и ASP.NET


2-1259322314
andrewtitoff
2009-11-27 14:45
2010.01.17
TrayIcon1.ShowBalloonHint


2-1259073148
guest2009
2009-11-24 17:32
2010.01.17
ComboBox обрезка длинного текста


2-1259181108
vlad_
2009-11-25 23:31
2010.01.17
Mdi Delphi


2-1259253418
Molchanov
2009-11-26 19:36
2010.01.17
WndProc vs WindowProc





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский