Определить, что текущая раскладка Ru или не Ru

← →
@!!ex © (2008-03-26 08:19) [0]

Как?

← →
TUser © (2008-03-26 08:31) [1]

GetKeywordLayout или что-то вроде того.

← →
@!!ex © (2008-03-26 09:20) [2]

Ок. Спасибо!

← →
kyn66 (2008-03-26 10:52) [3]

Я к примеру при изменении раскладки клавы меняю значок вот так:
procedure TMainFrm.Timer1Timer(Sender: TObject); Const re : array[Boolean] of byte = (0, 1); var Layout: array [0.. KL_NAMELENGTH] of char; begin GetKeyboardLayoutName(Layout); LayoutImage1.Picture.Bitmap := PicClip2.GraphicCell[re[Layout = "00000409"]]; LayoutImage2.Picture.Bitmap := PicClip2.GraphicCell[re[Layout = "00000409"]]; LayoutImage3.Picture.Bitmap := PicClip2.GraphicCell[re[Layout = "00000409"]]; end;

← →
tesseract © (2008-03-26 12:31) [4]

> Я к примеру при изменении раскладки клавы меняю значок вот
> так:

Редкий изврат. Надо просто обрабатывать WM_INPUTLANGCHANGE

> Ок. Спасибо!

if GetKeyboardLayoutName= "00000419" then result:=true;

> Редкий изврат. Надо просто обрабатывать WM_INPUTLANGCHANGE
>

- а что в Висте это уже починили?
А то мне пришлось msctf пользовать - ITfLanguageProfileNotifySink на ITfInputProcessorProfiles/ITfSource вешать...

> - а что в Висте это уже починили?

Висту надо сносить :-). Не в курсе, не бодался с нею.

Определить, что текущая раскладка Ru или не Ru Найти похожие ветки