From b048475ff677b3caec168bb0d7340ad5d930d811 Mon Sep 17 00:00:00 2001
From: martin_r <martin_r@b9310e46-f624-0410-8ea1-cfbb3a30dc96>
Date: Tue, 27 Jan 2009 15:17:59 +0000
Subject: #114 fixed: Status von Numlock wird bei Unterbrechen und Beenden des
 Skripts bis zum Wiederaktivieren des Skripts wiederhergestellt

git-svn-id: https://svn.neo-layout.org@1557 b9310e46-f624-0410-8ea1-cfbb3a30dc96
---
 windows/neo-vars/src/source/trayfunctions.ahk | 27 +++++++++++++++++++--------
 1 file changed, 19 insertions(+), 8 deletions(-)

(limited to 'windows/neo-vars/src/source/trayfunctions.ahk')

diff --git a/windows/neo-vars/src/source/trayfunctions.ahk b/windows/neo-vars/src/source/trayfunctions.ahk
index fabf55c..d73eeb8 100644
--- a/windows/neo-vars/src/source/trayfunctions.ahk
+++ b/windows/neo-vars/src/source/trayfunctions.ahk
@@ -3,12 +3,15 @@ togglesuspend:
     menu, tray, rename, %enable%, %disable%
     menu, tray, tip, %name%
     menu, tray, icon, %ResourceFolder%\neo_enabled.ico,,1
-    suspend , off ; Schaltet Suspend aus -> NEO
+    Gosub, SaveNumLockState
+    SetNumLockState Off
+    suspend, off ; Schaltet Suspend aus -> NEO
   } else {
     menu, tray, rename, %disable%, %enable%
     menu, tray, tip, %name% : Deaktiviert
     menu, tray, icon, %ResourceFolder%\neo_disabled.ico,,1
-    suspend , on  ; Schaltet Suspend ein -> QWERTZ
+    SetNumLockState, %SavedNumLockState%
+    suspend, on  ; Schaltet Suspend ein -> QWERTZ
   }
 return
 
@@ -17,18 +20,18 @@ help:
 return
 
 about:
-  msgbox, 64, %name% – Ergonomische Tastaturbelegung, 
+  msgbox, 64, %name% � Ergonomische Tastaturbelegung, 
   (
   %name% 
-  `nDas Neo-Layout ersetzt das übliche deutsche 
+  `nDas Neo-Layout ersetzt das �bliche deutsche 
   Tastaturlayout mit der Alternative Neo, 
   beschrieben auf http://neo-layout.org/. 
-  `nDazu sind keine Administratorrechte nötig. 
+  `nDazu sind keine Administratorrechte n�tig. 
   `nWenn Autohotkey aktiviert ist, werden alle Tastendrucke 
-  abgefangen und statt dessen eine Übersetzung weitergeschickt. 
-  `nDies geschieht transparent für den Anwender, 
+  abgefangen und statt dessen eine �bersetzung weitergeschickt. 
+  `nDies geschieht transparent f�r den Anwender, 
   es muss nichts installiert werden. 
-  `nDie Zeichenübersetzung kann leicht über das Icon im 
+  `nDie Zeichen�bersetzung kann leicht �ber das Icon im 
   Systemtray deaktiviert werden.  `n
   )
 return
@@ -58,6 +61,14 @@ hide:
 return
 
 exitprogram:
+  SetNumLockState, %SavedNumLockState%
   exitapp
 return
 
+SaveNumLockState:
+  if GetKeyState("NumLock","T")
+    SavedNumLockState = On
+  else
+    SavedNumLockState = Off
+return
+
-- 
cgit v1.2.3