![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Раскладка клавиатуры
Orion2 © (2004-05-13 12:46:00)Скажите пожалуйста как можно изменить раскладку клавиатуры в другом приложении (для своей оболочки - shell'а)
Orion2 (2004-05-13 13:43:00) [1]> DVM
Не знаю надо попробовать. По идее еще надо AttachThreadInput юзать.
DVM (2004-05-13 13:28:00) [2]
> Orion2 © (13.05.04 13:26) [4]
Не уверен, но я вроде бы и для окон других потоков переключал.
Orion2 (2004-05-13 13:26:00) [3]> DVM
Стоп. Оно же работает для текущего потока (т.е. для своего), или я не прав?
DVM (2004-05-13 13:22:00) [4]
> Orion2 © (13.05.04 13:18) [2]
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;
Orion2 (2004-05-13 13:18:00) [5]> DVM
неа не легче. Надо свой
DVM (2004-05-13 13:11:00) [6]А не легче ли подгрузить стандартный переключатель раскладок?