Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #SingleInstance Force
- Width := "640|800|1024|1050|1080|1120|1280|1360|1366|1440|1536|1600|1680|1920|2048|2560|3440|3800|3840"
- Height := "360|600|720|768|800|864|900|1024|1050|1080|1152|1200|1440|1600|2160"
- SysGet, Screen, MonitorWorkArea
- Gui, +AlwaysOnTop
- Gui, Color, aaaaaa
- Gui, Font, s14 Tahoma
- Gui, Add, DropDownList, choose1 w70 vWidthValue gSubmit, % Width
- Gui, Add, Text, ym,x
- Gui, Add, DropDownList, ym choose1 w70 vHeightValue gSubmit, % Height
- Gui, show, ,WGT
- ^r::
- Gui, show, ,WGT
- return
- Submit:
- Gui, Submit, NoHide
- WinMove, WGT Golf, , (ScreenRight-WidthValue)/2, (ScreenBottom-HeightValue)/2,WidthValue,HeightValue
- WinActivate, WGT
- return
- ^x::ExitApp
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement