summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authormösi <mösi@b9310e46-f624-0410-8ea1-cfbb3a30dc96>2009-02-13 18:32:57 +0000
committermösi <mösi@b9310e46-f624-0410-8ea1-cfbb3a30dc96>2009-02-13 18:32:57 +0000
commita31db9777a2d5560074a2bfa452dc8c0aac5bd3f (patch)
tree3f95c696c0c1f0424cbe4cd2e43d93b9704e92d5
parent7a13b376f8e0e32e579c2b096dc8953eb5646f3f (diff)
Gui statt MsgBox
Deutsche Bezeichnungen für die diakritischen Tasten git-svn-id: https://svn.neo-layout.org@1660 b9310e46-f624-0410-8ea1-cfbb3a30dc96
-rw-r--r--windows/neo-vars/src/source/shortcuts.ahk20
-rw-r--r--windows/neo-vars/src/source/tools.ahk36
2 files changed, 34 insertions, 22 deletions
diff --git a/windows/neo-vars/src/source/shortcuts.ahk b/windows/neo-vars/src/source/shortcuts.ahk
index 8a08281..cc9f2ef 100644
--- a/windows/neo-vars/src/source/shortcuts.ahk
+++ b/windows/neo-vars/src/source/shortcuts.ahk
@@ -236,16 +236,16 @@ CBS__M8 := "Mod8=Shift+Mod3+Mod4+"
CBSComp := "Compose"
CBTAcut := "Akut"
-CBTgrav := "Grave"
-CBTcedi := "Cedilla"
-CBTabdt := "Abovedot"
+CBTgrav := "Gravis"
+CBTcedi := "Cedille"
+CBTabdt := "Punkt darüber"
CBTogon := "Ogonek"
-CBTcflx := "Circumflex"
-CBTcron := "Caron"
+CBTcflx := "Zircumflex"
+CBTcron := "Hatschek"
CBTbrve := "Breve"
-CBTbldt := "Belowdot"
+CBTbldt := "Punkt darunter"
CBTtlde := "Tilde"
-CBTmcrn := "Macron"
-CBTdrss := "Diaeresis"
-CBTdbac := "Doubleacute"
-CBTstrk := "Stroke" \ No newline at end of file
+CBTmcrn := "Makron"
+CBTdrss := "Trema"
+CBTdbac := "Doppelakut"
+CBTstrk := "Schrägstrich" \ No newline at end of file
diff --git a/windows/neo-vars/src/source/tools.ahk b/windows/neo-vars/src/source/tools.ahk
index 38a42ee..835ef1e 100644
--- a/windows/neo-vars/src/source/tools.ahk
+++ b/windows/neo-vars/src/source/tools.ahk
@@ -514,7 +514,10 @@ SetFormat,Integer,h
SetFormat,Integer,d
a := "U" . substr("0000" . substr(a,3),-3)
- wmn := "Das Zeichen " . a . " kann wie folgt eingegeben werden:`r`n"
+ Gui,2:Destroy
+ Gui,2:Font,,DejaVu Sans
+ Gui,2:Margin,10,0
+ Gui,2:Add,Text,,% "`r`nDas Zeichen " . a . " kann wie folgt eingegeben werden:"
loop,parse,CRC%a%,%A_Space%
{
this_wmn := ""
@@ -545,23 +548,32 @@ SetFormat,Integer,d
this_wmn := SubStr(this_wmn,2)
if (this_wmnk != "")
this_wmnk := SubStr(this_wmnk,2)
+ Gui,2:Font,,Dejavu Sans Bold
if (nthis == 1)
- wmn .= "Wegen fehlender Tastenbelegung: Nicht als Compose:`r`n"
+ Gui,2:Add,Text,,% "Wegen fehlender Tastenbelegung nicht als Compose:"
else
- wmn .= "Als Compose:`r`n"
- wmn .= this_wmn . "`r`noder`r`n" . this_wmnk . "`r`n`r`n"
+ Gui,2:Add,Text,,% "Als Compose:"
+ Gui,2:Font,,Dejavu Sans
+ Gui,2:Add,Text,,% this_wmn . "`r`noder`r`n" . this_wmnk
}
wmnk := KeyLong(CRK%a%)
- if (wmnk != "")
- wmn .= "Als Tastendruck:`r`n" . wmnk
- else
- wmn .= "Als Tastendruck nicht verfügbar!"
+ Gui,2:Font,,Dejavu Sans Bold
+ if (wmnk != "") {
+ Gui,2:Add,Text,,% "Als Tastendruck:"
+ Gui,2:Font,,Dejavu Sans
+ Gui,2:Add,Text,,% wmnk
+ } else
+ Gui,2:Add,Text,,% "Als Tastendruck nicht verfuegbar"
- if (wmn != "")
- MsgBox,0,Wie mit NEO,% wmn
- else
- TrayTip,Wie mit NEO,Keine Information über %a% gefunden,10,1
+ Gui,2:Add, Button, Default xp+100 yp+40, OK
+ Gui,2:Show
+ return
+
+ 2ButtonOK:
+ 2GuiEscape:
+ Gui,2:Destroy
+ return
}
KeyLong(key) {