Cool.
I fooled with the color and font size and suspect I can change the font color too with a little research.
(What about the font itself? Or are we stuck with this Arial type font?)
The only thing left is to take out code, believe it or not.
All our machines run at the same screen resolution (1280x768), and our encoding app always runs full screen, so I don't need the overlays to be dynamically positioned at all.
Strict X and Y and W and H values which I can change by hand would be perfect. (I'll be spacing multiple colored boxes and up to 12 buttons all over the interface where there is unused space)
Will I be able to place buttons within the same space as the color overlay?
Can't wait to try v2!
F1::
{
Gui, 1: Destroy
Gui, 2: Destroy
; Get stats for the active window.
WinGetPos, X, Y, W, H, A
; Build out first GUI for the overlay.
Gui, 1: +Toolwindow -Caption +Lastfound +AlwaysOnTop
Gui, 1: Font, s60 ; Change the s# value to adjust font size.
Gui, 1: Add, Text, xm+570 ym+125 w100 h25 0x200 vmyText, EVDCAP 6 ; Change the xm/ym
values to position the text.
Gui, 1: Font
Gui, 1: Color, Red ; Change overlay colour here.
Gui, 1: Show, % "x" . x . "y" . y . "w" . w . "h" . h, Overlay
GUI_ID := WinExist()
; Set it transparent and make it click-through.
WinSet, Transparent, 85 , % "ahk_id " . GUI_ID ; Change the numerical value for opaqueness
amount.
WinSet, ExStyle , ^0x00000020, % "ahk_id " . GUI_ID ; Leave this value alone.
; Build out second GUI for the buttons.
Gui, 2: Margin, 0, 0
Gui, 2: +Toolwindow -Caption +Lastfound +AlwaysOnTop
Gui, 2: Add, Button, x y w100 h25 vmyButton1 gonClick, Click 1
Gui, 2: Add, Button, x y w100 h25 vmyButton2 gonClick, Click 2
Gui, 2: Show, % "x" . ( x + w ) . " y" . y
}
Return
onClick:
{
Gui, 2: Submit, NoHide
If ( A_GuiControl = "NTSC" )
{
; Do stuff here.
MsgBox, (code for switching to NTSC to be inserted later)
}
Else If ( A_GuiControl = "PAL" )
{
; Do other stuff here.
MsgBox, (code for switching to PAL to be inserted later)
}
}
Return