Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как программно переключить языки [D6, WinXP]


kivadim ©   (2005-04-21 16:51:00) 

Хорошо известен код, программно переключающий языки с русского на английский и наоборот:

procedure SetRU;
var
 Layout: array [0.. KL_NAMELENGTH] of char;
begin
 LoadKeyboardLayout(StrCopy(Layout, '00000419'), KLF_ACTIVATE);
end;

procedure SetEN;
var
 Layout: array [0.. KL_NAMELENGTH] of char;
begin
 LoadKeyboardLayout(StrCopy(Layout, '00000409'), KLF_ACTIVATE);
end;


Вопрос: Как программно переключиться на другие установленные языки (немецкий, фрацузкий, румынский и т.д.)?


panov   (2005-04-21 20:21:00) [1]

В форуме уже есть такие вопросы.


MakNik   (2005-04-21 18:09:00) [2]

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/intl/nls_238z.asp


Наверх

Титульная страница Поиск, карта сайта Написать письмо