Модераторы: Snowy, bartram, MetalFan, bems, Poseidon, Riply
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как определить, какая локализация ОС ? 
V
    Опции темы
psgpsg
Дата 6.10.2006, 11:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 14
Регистрация: 15.8.2006

Репутация: нет
Всего: нет



Выполнил установку английской версии Windows
- в региональных настройках в "Standart and formats" и "Location" установил "Russian"
- пытаюсь использовать GetLocaleInfo(LOCALE_SYSTEM_DEFAULT,Flag.. 
- перепробовал все необходимые значения переменной flag в  но не получается определить, что установлена именно английская версия Windows... Эта ф-ция возвращает Russian
PM MAIL   Вверх
Sunvas
Дата 6.10.2006, 20:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Соль и сахар
****


Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: нет
Всего: 89



Как вариант: проверяй надпись на кнопке "Пуск".. smile 


--------------------
Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.
PM MAIL   Вверх
psgpsg
Дата 7.10.2006, 09:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 14
Регистрация: 15.8.2006

Репутация: нет
Всего: нет



2 Sunvas:

С Вами можно согласиться, если бы задача состояла только в том, чтобы НЕ ПРОГРАММНЫМ путем определить язык дистрибутива Windows. Но вся загвоздка в том и состоит, что это надо сделать с использованием какого-либо вызова IP-шной ф-ции или какой-то тулзы !


PM MAIL   Вверх
Guedda
Дата 7.10.2006, 09:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Подрывник
****


Профиль
Группа: Завсегдатай
Сообщений: 3137
Регистрация: 27.12.2005
Где: Ростов-на-Дону

Репутация: 3
Всего: 78



Цитата

Lists the locales for which support is available.

Unit

SysUtils

Category

Application-level information

function Languages: TLanguages;

Description

Use the value returned by Languages to obtain information about the locales that the system supports.



--------------------
Ll 2
PM MAIL WWW ICQ Skype GTalk   Вверх
Snowy
Дата 7.10.2006, 12:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 30
Всего: 484



Английской винды у меня нет.
Проверить не могу.
Но по идее так:
Код

function GetSystemDefaultUILanguage: UINT; stdcall; external kernel32 name 'GetSystemDefaultUILanguage';

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(IntToStr(GetSystemDefaultUILanguage));
end;

PM MAIL   Вверх
Alexeis
Дата 7.10.2006, 12:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 16
Всего: 459



Snowy, у меня MUI показывает 1033 
это английская?


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
Snowy
Дата 7.10.2006, 13:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 30
Всего: 484



Это американская.
Русская, соответственно 1049.
PM MAIL   Вверх
psgpsg
Дата 7.10.2006, 13:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 14
Регистрация: 15.8.2006

Репутация: нет
Всего: нет



2 Snowy :

Спасибо за совет ! Все получилось !

2 alexeis1 :

PRIMARYLANGID(1033) =   9; (т.е LANG_ENGLISH)
SUBLANGID(1033) =  1 (SUBLANG_ENGLISH_US ) - см. Windows.pas

Удач !
PM MAIL   Вверх
Snowy
Дата 7.10.2006, 14:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 30
Всего: 484



Угу. Американский английский.
Группа - английский, подгруппа US.

Читайте MSDN - там много полезного smile
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: WinAPI и системное программирование"
Snowybartram
MetalFanbems
PoseidonRrader
Riply

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • 99% ответов по WinAPI можно найти в MSDN Library, оставшиеся 1% здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, bartram, MetalFan, bems, Poseidon, Rrader, Riply.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: WinAPI и системное программирование | Следующая тема »


 




[ Время генерации скрипта: 0.0609 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.