Duda modificar tamaño Msgbox.
Posted: 07 Apr 2018, 07:28
Buenas.
Alguno me sabría decir que necesito añadir para poder cambiar el tamaño del msgbox?
Muchas gracias.
Alguno me sabría decir que necesito añadir para poder cambiar el tamaño del msgbox?
Muchas gracias.
Code: Select all
waitsecs := 10
OnMessage(0x44, "OnMsgBox")
SetTimer, updMsgBox, 1000
MsgBox 0x40023, Menu, PRUEBA1`nPRUEBA2, % waitsecs
IfMsgBox Yes, {
StopTimer()
MsgBox Go
} Else IfMsgBox No, {
StopTimer()
MsgBox Restart
} Else IfMsgBox Cancel, {
StopTimer()
MsgBox Nº Incidencia
} Else IfMsgBox Timeout, {
StopTimer()
MsgBox Exited for Timeout
}
ExitApp
StopTimer(){
SetTimer, updMsgBox, off
OnMessage(0x44, "OnMsgBox", 0)
}
OnMsgBox() {
global waitsecs
DetectHiddenWindows, On
Process, Exist
If (WinExist("ahk_class #32770 ahk_pid " . ErrorLevel)) {
FormatTime, timx, ,dd-MM-yyyy HH:mm:ss
ControlSetText Static2, % "Fecha: "timx "`nCountDwon: " --waitsecs
ControlSetText Button1, +1 MIN
ControlMove, +1 MIN, 10, , 60
ControlSetText Button2, RESTART
ControlMove, RESTART, 70, , 60
ControlSetText Button3, Nº Incidencia
ControlMove, Nº Incidencia, 130, , 80
}
}
updMsgBox:
OnMsgBox()
return