Раскладка клавиатуры

← →
Orion2 © (2004-05-13 12:46) [0]

Скажите пожалуйста как можно изменить раскладку клавиатуры в другом приложении (для своей оболочки - shell"а)

← →
DVM © (2004-05-13 13:11) [1]

А не легче ли подгрузить стандартный переключатель раскладок?

← →
Orion2 © (2004-05-13 13:18) [2]

> DVM
неа не легче. Надо свой

← →
DVM © (2004-05-13 13:22) [3]

> 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:26) [4]

> DVM
Стоп. Оно же работает для текущего потока (т.е. для своего), или я не прав?

> DVM
Не знаю надо попробовать. По идее еще надо AttachThreadInput юзать.

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