archive/neo
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

• Endlich kann man die Größe der Bildschirmtastatur ändern. Leider flackert’s ein wenig während der Größenänderung, sonst aber nicht.

Browse source 
git-svn-id: https://svn.neo-layout.org@2356 b9310e46-f624-0410-8ea1-cfbb3a30dc96
This commit is contained in:
mösi 2010-12-13 09:59:52 +00:00
parent cc0691e423
commit e18805dcac
2 changed files with 24 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
windows/neo-vars/src/source/keyhooks.ahk
View file

@ -22,3 +22,8 @@ GuiClose:
else
Gui, Destroy
return
GuiSize:
if (GuiCurrent!="")
%GuiCurrent%OnSize()
return

22
windows/neo-vars/src/source/screenkeyboard.ahk
View file

@ -125,7 +125,9 @@ GuiAddKey(key,x,y) {
global
x:=x-4
y:=y-10
Gui, Add, Text, x%x% y%y% w38 h38 Center 0x200 hwndGuiKey%key% BackgroundTrans
GuiPosx%key% := x
GuiPosy%key% := y
Gui, Add, Text, x%x% y%y% w38 h38 Center 0x200 vGuiKey%key% hwndGuiKey%key% BackgroundTrans
GuiKeyList := GuiKeyList . key . ","
}
@ -145,6 +147,20 @@ BSTOnClose() {
CharProc__BST0()
}
BSTOnSize() {
global
Gui, Show, % "y" . yposition . " w" . A_GuiWidth . " h" . A_GuiWidth*199/729 . " NoActivate", Neo-Bildschirmtastatur
GuiControl,,Picture0, % "*w" . A_GuiWidth . " *h-1 " . ResourceFolder . "\ebene0.png"
Gui, Font, % "s" . A_GuiWidth*12/729 . " bold", % UniFontName
loop,parse,GuiKeyList,`,
{
GuiPhysKey := A_LoopField
GuiControl,Font,GuiKey%GuiPhysKey%
GuiControl,Move,GuiKey%GuiPhysKey%, % "x" . GuiPosx%GuiPhysKey%*A_GuiWidth/729 . " y" . GuiPosy%GuiPhysKey%*A_GuiWidth/729 . " w" . 38*A_GuiWidth/729 . " h" . 38*A_GuiWidth/729
}
GuiControl,MoveDraw,Picture0
}
CharProc__BST0() {
global
GuiCurrent := ""
@ -186,7 +202,7 @@ CharProc__BST1() {
SysGet, WorkArea, MonitorWorkArea
yPosition := WorkAreaBottom - 230
Gui, Color, FFFFFF
Gui, Add, Picture,AltSubmit x0 y0 vPicture0, % ResourceFolder . "\ebene0.png"
Gui, Add, Picture,AltSubmit x0 y0 vPicture0, % ResourceFolder . "\ebene0.png"
Gui, Font, s12 bold, %UniFontName%
GuiKeyList := ""
GuiAddKeyS("029",6,9)
@ -271,7 +287,7 @@ CharProc__BST1() {
GuiAddKeySN("052",601,168)
GuiAddKeySN("053",658,168)
Gui, +AlwaysOnTop +ToolWindow
Gui, +AlwaysOnTop +ToolWindow +Resize -MaximizeBox
Gui, Show, y%yposition% w729 h199 NoActivate, Neo-Bildschirmtastatur
BSTUpdate()
BSTalwaysOnTop := 1