From e7036f60bdae524c61307ad8de3a429b992cc15d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?m=C3=B6si?= <mösi@b9310e46-f624-0410-8ea1-cfbb3a30dc96>
Date: Sun, 28 Mar 2010 13:38:18 +0000
Subject: =?UTF-8?q?Feinschliff=20f=C3=BCr=20Release:=20=E2=80=A2=20BSTN=20?=
 =?UTF-8?q?auf=20BST=20umbenannt,=20alte=20BST=20auf=20BSTO=20umbenannt,?=
 =?UTF-8?q?=20alle=20Funktionsaufrufe=20adaptiert.=20=E2=80=A2=20BST-Darst?=
 =?UTF-8?q?ellungsupdates=20optimiert.=20Spezialbelegungen=20wie=20Einhand?=
 =?UTF-8?q?modus=20brauchen=20einen=20eigenen=20Parameter=20zum=20Erzwinge?=
 =?UTF-8?q?n=20von=20Updates=20(Check=5FBSTUpdate(1)).=20=E2=80=A2=20BST?=
 =?UTF-8?q?=20hat=20nun=20ihre=20eigene=20Check=5FBSTUpdate()-Funktion,=20?=
 =?UTF-8?q?weniger=20Spaghetti=20beim=20Kunden.=20=E2=80=A2=20Die=20Haupt-?=
 =?UTF-8?q?BST,=20also=20die=20neue,=20liegt=20nun=20unter=20M3-F1.=20Die?=
 =?UTF-8?q?=20alte=20bekommt=20M3-F2.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

git-svn-id: https://svn.neo-layout.org@2240 b9310e46-f624-0410-8ea1-cfbb3a30dc96
---
 windows/neo-vars/src/source/screenkeyboard_old.ahk | 97 ++++++++++++++++++++++
 1 file changed, 97 insertions(+)
 create mode 100644 windows/neo-vars/src/source/screenkeyboard_old.ahk

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

diff --git a/windows/neo-vars/src/source/screenkeyboard_old.ahk b/windows/neo-vars/src/source/screenkeyboard_old.ahk
new file mode 100644
index 0000000..f9f7513
--- /dev/null
+++ b/windows/neo-vars/src/source/screenkeyboard_old.ahk
@@ -0,0 +1,97 @@
+BSTOguiErstellt := 0
+BSTOalwaysOnTop := 1
+BSTOcapsChars   := 0
+
+if (FileExist("ResourceFolder")<>false) {
+  FileInstall,ebene1.png,%ResourceFolder%\ebene1.png,1
+  FileInstall,ebene1Caps.png,%ResourceFolder%\ebene1Caps.png,1
+  FileInstall,ebene2.png,%ResourceFolder%\ebene2.png,1
+  FileInstall,ebene2Caps.png,%ResourceFolder%\ebene2Caps.png,1
+  FileInstall,ebene3.png,%ResourceFolder%\ebene3.png,1
+  FileInstall,ebene4.png,%ResourceFolder%\ebene4.png,1
+  FileInstall,ebene5.png,%ResourceFolder%\ebene5.png,1
+  FileInstall,ebene6.png,%ResourceFolder%\ebene6.png,1
+}
+
+CP3F2 := "P_BSTOt"
+CP3F8 := "P_BSTOA"
+
+BSTOSwitch(Eb) {
+  global
+  if (Eb <> BSTOEbeneAlt) {
+    BSTOeb := Eb
+    if (BSTOcapsChars) {
+      if (BSTOeb == "1")
+        BSTOeb := "1C"
+      else if (BSTOeb == "2C")
+        BSTOeb := "2"
+    }
+    GuiControl,Show,Picture%BSTOeb%
+    GuiControl,Hide,Picture%BSTOEbeneAlt%
+    BSTOEbeneAlt := Eb
+  }
+}
+
+BSTOOnClose() {
+  global
+  if (BSTOguiErstellt) {
+    BSTOguiErstellt := 0
+    GuiCurrent := ""
+    Gui, Destroy
+  }
+}
+
+BSTOToggle() {
+  global
+  if (BSTOguiErstellt) {
+    BSTOguiErstellt := 0
+    GuiCurrent := ""
+    Gui, Destroy
+  } else {
+    if (GuiCurrent!="")
+      %GuiCurrent%OnClose()
+
+    SysGet, WorkArea, MonitorWorkArea
+    yPosition := WorkAreaBottom - 230
+    Gui, Color, FFFFFF
+    Gui, Add, Picture,AltSubmit x0   y0          vPicture1, % ResourceFolder . "\ebene1.png"
+    Gui, Add, Picture,AltSubmit xp+0 yp+0 Hidden vPicture1C,% ResourceFolder . "\ebene1Caps.png"
+    Gui, Add, Picture,AltSubmit xp+0 yp+0 Hidden vPicture2, % ResourceFolder . "\ebene2.png"
+    Gui, Add, Picture,AltSubmit xp+0 yp+0 Hidden vPicture2C,% ResourceFolder . "\ebene2Caps.png"
+    Gui, Add, Picture,AltSubmit xp+0 yp+0 Hidden vPicture3, % ResourceFolder . "\ebene3.png"
+    Gui, Add, Picture,AltSubmit xp+0 yp+0 Hidden vPicture4, % ResourceFolder . "\ebene4.png"
+    Gui, Add, Picture,AltSubmit xp+0 yp+0 Hidden vPicture5, % ResourceFolder . "\ebene5.png"
+    Gui, Add, Picture,AltSubmit xp+0 yp+0 Hidden vPicture6, % ResourceFolder . "\ebene6.png"
+    Gui, +AlwaysOnTop +ToolWindow
+    Gui, Show, y%yposition% w776 h200 NoActivate, NEO-Bildschirmtastatur (statisch)
+    BSTOEbeneAlt := 1
+    BSTOguiErstellt := 1
+    BSTOSwitch(EbeneNC)
+    BSTOalwaysOnTop := 1
+    GuiCurrent := "BSTO"
+  }
+}
+
+BSTOToggleAlwaysOnTop() {
+  global
+  if (BSTOalwaysOnTop) {
+    Gui, -AlwaysOnTop
+    BSTOalwaysOnTop := 0    
+  } else {
+    Gui, +AlwaysOnTop
+    BSTOalwaysOnTop := 1
+  }
+}
+
+CharProc_BSTOt() {
+  global
+  ; Bildschirmtastatur Ein/Aus
+  BSTOToggle()
+}
+
+CharProc_BSTOA() {
+  global
+  ; Bildschirmtastatur AlwaysOnTop
+  if (BSTOguiErstellt)
+    BSTOToggleAlwaysOnTop()
+}
-- 
cgit v1.2.3