Узнать текущую раскладку клавиатуры в любом активном окне
возвращает числовое значение соответственно установленной раскладке
Зависимости: windows
|
Code: |
|
**** UBPFD *********** **** >> Автор: KosilkA, Этот адрес электронной почты защищён от спам-ботов. У вас должен быть включен JavaScript для просмотра., Koenigsberg Copyright: delphi help и немного усердия :-) ***************************************************** }
if GetKeyboardLayout(GetWindowThreadProcessId(GetForegroundWindow, nil)) = 67699721 then //раскладка английская else //раскладка НЕанглийская, например 68748313 соответствует русской |
Просьба писать ваши замечания, наблюдения и все остальное,
что поможет улучшить предоставляемую информацию на этом сайте.
ВСЕ КОММЕНТАРИИ МОДЕРИРУЮТСЯ ВРУЧНУЮ, ТАК ЧТО СПАМИТЬ БЕСПОЛЕЗНО!