Кто знает как программно узнать какой язык на данный момент на клавиатуре, для того что бы его вывести как текст на форму обработки

send key

sendkey()

создаить ком-объект vbs и съэмулировать нажатие клавиши "a". Сравнить клавишу с русской и английской раскладкой

(0) всего две? слабак!

ВалераОшкин, не получается подключится через vbs = Новый COMObject("vbs"); выдает ошибку

Может кто-то подключался c 1C к параметрам Windows

хм - на панели задач не видно раскладки или зачем все это надо?

(5) чё за бред COMObject("vbs");


WshShell = Новый COMObject("Wscript.Shell");
   WshShell.SendKeys("^{DOWN}");
   WshShell.SendKeys("^{DOWN}");

для того что бы на форму обработки вывести текущий язык

shuhard, спасибо, буду пробывать

хм, осталось выяснить, как (8) поможет в определении текущего языка клавиатуры.

(10) хотя я бы использовал WMI

WshShell = Новый COMObject("Wscript.Shell");
   WshShell.SendKeys("^{DOWN}");
   WshShell.SendKeys("^{DOWN}");
Работает только включает/отключает NumLock

А как узнать язык какой текущий?

WMI - а можно пожалуйста по подобней?

имхается мне, что не через SendKey

кстати v8: Возможно ли определить текущий язык раскладки клавиатуры поиск то пора освоить уже.

в этой тебе тоже ничего нет

там есть ссылка где посмотреть можно.

(13)[Работает только включает/отключает NumLock]

(13)[Работает только включает/отключает NumLock]
а чё по твоему должен делать  WshShell.SendKeys("^{DOWN}"); ?

а как сделать что бы возвращал тек. язык клавиатуры?))

(21) а это к   ВалераОшкин

я бы покурил в сторону winapi копай отсюда
http://www.sql.ru/forum/actualthread.aspx?tid=36901
и дальше куда гугл приведет