Как определить раскладку в другой программе ?

← →
pentium © (2002-07-30 03:23) [0]

Ситуация такова запущена программа например (Word, Winamp, Блокнот) в принципе без разницы.
Дальше запускается моя программа, и в какой-то из процедур надо определить раскладку клавиатуры в программе например (Word или Winamp или Блокноте). Запомнить раскладку и в дальнейшем использовать эту информацию в своей программе.

Для определения раскладки используется функция GetKeyboardLayout().
Для определении раскладки в своей программе GetKeyboardLayout(0) или GetKeyboardLayout(GetCurrentThreadId).
Как определить раскладку в другой программе GetKeyboardLayout(????????) ? Вроде надо знать идентификатор процесса(программы), для которого выясняется раскладка клавиатуры GetCurrentProcessID() ?
Хотелось бы пример.

← →
Yurko © (2002-07-31 03:08) [1]

var KL: HKL; begin KL := GetKeyboardLayout(GetWindowThreadProcessId(GetForegroundWindow, nil)); //раскладка для активной программы end;

Спасибо Yurko! Определение раскладка для активной программы мне тоже пригодится. А возможно определить раскладку не для активной ?

Как определить раскладку в другой программе ? Найти похожие ветки