Как определить русифицирована windows или нет?

← →
Baks (2010-09-27 14:02) [0]

Подскажите, как определить русифицирована windows или нет?
Имеется ввиду язык всех текстов windows.

← →
Плохиш © (2010-09-27 16:33) [1]

Гугля в первой же ссылке код выдаёт.

← →
Dennis I. Komarov © (2010-09-27 16:39) [2]

Гугля таким доверием не обладает ;)

← →
Anatoly Podgoretsky © (2010-09-27 16:59) [3]

> Плохиш (27.09.2010 16:33:01) [1]

Гугль по данному вопросу не имеет ответа на первой странице и не листать же
дальше

← →
Плохиш © (2010-09-27 17:48) [4]

> Anatoly Podgoretsky © (27.09.10 16:59) [3]

У тебя гугля неправильная :-P
Хотя я почти на родном языке создателей делфи и вындовса вопрос задавал, не буду же я всякую фигню в гуглю копировать ;-)

← →
Baks (2010-09-27 18:08) [5]

Вот так правильно?

function IsRussianLCID: Boolean;
const
RussianLCID = 1049; // 1033 EN

var
LaCID: LCID;
begin
LaCID := GetSystemDefaultLCID;
Result := LaCID = RussianLCID;
end;

← →
TUser © (2010-09-27 19:05) [6]

> Имеется ввиду язык всех текстов windows.

result := false - это мировая константа

← →
Anatoly Podgoretsky © (2010-09-27 19:32) [7]

> Плохиш (27.09.2010 17:48:04) [4]

Кто бы спорил, поэтому я Гуглю почти и не использую, она мало того, что не
то дает, но еще и кучу мусора выводит. Ну ее нафиг, пусть гугловоды с ней
работают.

← →
Baks (2010-09-27 20:22) [8]

> TUser © (27.09.10 19:05) [6]

Я имел ввиду локализация, русификация.

> Dennis I. Komarov © (27.09.10 16:39) [2]
> Гугля таким доверием не обладает ;)

Точно!

← →
TIF © (2010-09-28 04:09) [9]

> локализация, русификация.

Это разные вещи

← →
Baks (2010-09-28 14:06) [10]

> TIF © (28.09.10 04:09) [9]

Я имею ввиду Windows XP RU или Windows XP EN?

Моя программа не поддерживает юникод и на нерусифицированной ос
символы кириллицы могут отображаться некорректно. Поэтому при старте программы я хочу выполнить: if not IsRussianLCID then сообщение про настройки для программ не поддерживающих юникод. Вот поэтому и спрашиваю как это лучше определить?

← →
Anatoly Podgoretsky © (2010-09-28 15:07) [11]

А ты попробуй на локализированой системе установить русскую локализацию и посмотри, что твоя программа покажет.

← →
Baks (2010-09-28 17:00) [12]

У меня Windows XP RUS. В настройках "Язык для программ не поддерживающих Юникод" выбрано "Русский". GetSystemDefaultLCID возвращает 1049.

← →
han_malign (2010-09-28 17:37) [13]

> В настройках "Язык для программ не поддерживающих Юникод" выбрано "Русский".

GetACP() = 1251
кодовая страница по умолчанию для конвертирования в/из UCS-2

← →
Baks (2010-09-28 17:55) [14]

Теперь получилась такая функция:

function IsRussianACP: Boolean;
const
RussianACP = 1251;

var
ACP: UINT;
begin
ACP := GetACP;
Result := ACP = RussianACP;
end;

if not IsRussianACP then сообщение про настройки "Язык для программ не поддерживающих Юникод".

Так правильно?

> Baks (28.09.2010 17:00:12) [12]

Я уже рекомендовал провести эту операцию на Windows XP EN с установкой в
настройках "Русский".
Получишь тоже самое, хотя по вопросу нужно получить 1033

← →
Baks (2010-09-29 19:49) [16]

> Anatoly Podgoretsky © (29.09.10 12:21) [15]
Я уже рекомендовал провести эту операцию на Windows XP EN с установкой в
настройках "Русский".
Получишь тоже самое, хотя по вопросу нужно получить 1033

Но так это будет то, что мне нужно. Я имею ввиду, что если в Windows XP EN будет выбрано "Язык для программ не поддерживающих Юникод" / "Русский", то функция вернёт 1049 и это значит, что символы кириллицы должны читаться. Получается не так важно какая Windows EN или RU.

> Baks (29.09.2010 19:49:16) [16]

Получается, что не важно, но теперь перечитай свой вопросю

← →
Baks (2010-09-30 20:02) [18]

> теперь перечитай свой вопросю

Да, немного неправильно спросил :)

> Baks (30.09.2010 20:02:18) [18]

Так вот если бы правильно спросил, наверно сразу бы получил ответ, а так все
искали решение, хотя многие поколения до, доказали что его нет. Только какие
то подозрительняе или хакерские.

← →
Baks (2010-10-01 19:23) [20]

Спасибо всем!

Как определить русифицирована windows или нет? Найти похожие ветки