<?xml version="1.0" encoding="utf-8"?>
<rss version="2.0" xmlns:atom="http://www.w3.org/2005/Atom">
	<channel>
		<title><![CDATA[Серый форум &mdash; AutoHotkey: отображение текущей раскладки светодиодом ScrollLock]]></title>
		<link>http://forum.script-coding.com/viewtopic.php?id=305</link>
		<atom:link href="http://forum.script-coding.com/extern.php?action=feed&amp;tid=305&amp;type=rss" rel="self" type="application/rss+xml" />
		<description><![CDATA[Недавние сообщения в теме «AutoHotkey: отображение текущей раскладки светодиодом ScrollLock».]]></description>
		<lastBuildDate>Thu, 01 Feb 2007 07:06:16 +0000</lastBuildDate>
		<generator>PunBB</generator>
		<item>
			<title><![CDATA[AutoHotkey: отображение текущей раскладки светодиодом ScrollLock]]></title>
			<link>http://forum.script-coding.com/viewtopic.php?pid=1802#p1802</link>
			<description><![CDATA[<p>Для максимального использования экранного пространства можно установить режим &quot;Автоматически скрывать панель задач&quot;. В этом режиме панель задач постоянно спрятана, за исключением случаев, когда она явно вызывается мышью или кнопкой Win. У такого режима есть масса преимуществ и один недостаток: не видно, в каком режиме находится клавиатура - в русском или в английском. Чтобы это узнать (например, в момент ввода пароля), приходится нажимать Win, что неприятно. Поэтому на AHK можно сделать так, чтобы светодиодный индикатор ScrollLock светился, когда включен русский язык, и выключался, когда включен английский.<br />Индикатор этот по жизни вполне бесполезен. Но на случай, если какая-нибудь программа использует ScrollLock (например - Excel), предусмотрено отключение/включение нового режима по нажатию Win+ScrollLock.<br /></p><div class="codebox"><pre><code>SetTimer RussianLED
#ScrollLock::
  if ScrollLockRussianModeOff {
    SetTimer RussianLED, On
    MsgBox ScrollLock LED now indicates Russian Layout
  }
    else {
      SetTimer RussianLED, Off
      MsgBox ScrollLock LED does NOT indicates Russian Layout
    }
  ScrollLockRussianModeOff := !ScrollLockRussianModeOff
return
RussianLED:
  WinGet, WID, ID, A
  WT := DllCall(&quot;GetWindowThreadProcessId&quot;, &quot;UInt&quot;, WID, &quot;UInt&quot;, 0)
  LID := DllCall(&quot;GetKeyboardLayout&quot;, &quot;UInt&quot;, WT)
  Russian := LID = 68748313 ? 1 : 0
  if Russian
    SetScrollLockState On
    else SetScrollLockState Off
return</code></pre></div><p>Автор скрипта - <strong>Ludens</strong>.</p>]]></description>
			<author><![CDATA[null@example.com (The gray Cardinal)]]></author>
			<pubDate>Thu, 01 Feb 2007 07:06:16 +0000</pubDate>
			<guid>http://forum.script-coding.com/viewtopic.php?pid=1802#p1802</guid>
		</item>
	</channel>
</rss>
