Ich hab damals schon hier und da mal ein kiddy Script zusammen geschustert.
Hier hat man mir immer gut geholfen.
Es ist wieder soweit.
Code: Select all
IniRead , auflösung1 , C:\ProgramData\Keybinder\Data.ini , auf, auflösung1
IniRead , auflösung2 , C:\ProgramData\Keybinder\Data.ini , auf , Auflösung2
IniRead , xwertberechnet , C:\ProgramData\Keybinder\Data.ini , berechnet, xwertberechnet
IniRead , ywertberechnet , C:\ProgramData\Keybinder\Data.ini , berechnet , ywertberechnet
Gui, Add, Edit, vauflösung1 x32 y49 w110 h20 , %auflösung1%
Gui, Add, Edit, vauflösung2 x172 y49 w110 h20 , %auflösung2%
Gui, Add, Text, x142 y49 w30 h20 , --X--
Gui, Add, Text, x32 y19 w100 h20 , Auflösung
Gui, Add, Button, x302 y49 w100 h20 gsave, Speichern
Gui, Show, x382 y116 h379 w479 , New GUI Window
WinGetPos, winX, winY, winWidth, winHeight, RAGE
Xo := 1675
Yo := 727
Xr := 1588
Yr := 665
Xh := 1035
Yh := 475
Xe := 1130
Ye := 360
X := winWidth * %xwertberechnet%
Y := winHeight * %ywertberechnet%
Xi := winWidth * 0.33
Yi := winHeight * 0.44
Xf := 864
Yf := 475
Code: Select all
save:
IniWrite , %auflösung1% , C:\ProgramData\Keybinder\Data.ini , auf, auflösung1
IniWrite , %auflösung2% , C:\ProgramData\Keybinder\Data.ini , auf , Auflösung2
xwertberechnet :=0.2 * 1980 / %auflösung1%
ywertberechnet :=0.51 * 1080 /%auflösung2%
xwertberechnet := Round(Zahl , 2)
ywertberechnet := Round(Zahl , 2)
IniWrite , %xwertberechnet% , C:\ProgramData\Keybinder\Data.ini , berechnet, xwertberechnet
IniWrite , %ywertberechnet% , C:\ProgramData\Keybinder\Data.ini , berechnet , ywertberechnet
SoundBeep 750
reload
return
Habe Hier und da alles mögliche geändert und versucht. Nach einem Fehler behoben kam der nächste usw. bis ich es mir komplett zerschossen habe.
Vllt. versteht einer meinen Ansatz und hat einen Tipp bzw eine zündende Idee für mich.
Schon einmal danke fürs lesen