Обратный таймер на кнопке ОК
- Автор темы NONer
- Дата начала
Самопальный MsgBox.
Есть ещё такая старая тема [решено] MsgBox (Ok, Cancel) с обратным отсчетом времени.
Есть ещё такая старая тема [решено] MsgBox (Ok, Cancel) с обратным отсчетом времени.
Самопальный Msgbox не работает, выдает множество ошибок (во вложении). Видимо это для старой версии AutoIt.
Добавлено:
Добавлено:
Сообщение автоматически объединено:
Это обычное сообщение с таймером, мне известно и пока я пользуюсь таким решением. Вот только я хочу именно таймер на кнопке "ОК".Skif_off сказал(а):
Вложения
- Сообщения
- 3,999
- Репутация
- 967
NONer [?]
Меняем в файле MsgBox.au3 секцию #Region Global Variables на то, что ниже и будет вам счастье.
Это кто вам такое сказал.
Меняем в файле MsgBox.au3 секцию #Region Global Variables на то, что ниже и будет вам счастье.
Код:
#Region Global Variables
;~ Global Const $MB_ABORTRETRYIGNORE = 0x2
;~ Global Const $MB_APPLMODAL = 0x0
;~ Global Const $MB_CANCELTRYCONTINUE = 0x6
;~ Global Const $MB_COMPOSITE = 0x2
;~ Global Const $MB_DEFAULT_DESKTOP_ONLY = 0x20000
;~ Global Const $MB_DEFBUTTON1 = 0x0
;~ Global Const $MB_DEFBUTTON2 = 0x100
;~ Global Const $MB_DEFBUTTON3 = 0x200
;~ Global Const $MB_DEFBUTTON4 = 0x300
Global Const $MB_DEFMASK = 0xF00
Global Const $MB_ERR_INVALID_CHARS = 0x8
Global Const $MB_FUNC = 0x4000
;~ Global Const $MB_HELP = 0x4000
;~ Global Const $MB_ICONASTERISK = 0x40
;~ Global Const $MB_ICONERROR = $MB_ICONHAND
;~ Global Const $MB_ICONEXCLAMATION = 0x30
;~ Global Const $MB_ICONHAND = 0x10
;~ Global Const $MB_ICONINFORMATION = $MB_ICONASTERISK
Global Const $MB_ICONMASK = 0xF0
;~ Global Const $MB_ICONQUESTION = 0x20
;~ Global Const $MB_ICONSTOP = $MB_ICONHAND
;~ Global Const $MB_ICONWARNING = $MB_ICONEXCLAMATION
Global Const $MB_MISCMASK = 0xC000
Global Const $MB_MODEMASK = 0x3000
Global Const $MB_NOFOCUS = 0x8000
;~ Global Const $MB_OK = 0x0
;~ Global Const $MB_OKCANCEL = 0x1
;~ Global Const $MB_PRECOMPOSED = 0x1
;~ Global Const $MB_RETRYCANCEL = 0x5
;~ Global Const $MB_RIGHT = 0x80000
;~ Global Const $MB_RTLREADING = 0x100000
;~ Global Const $MB_SERVICE_NOTIFICATION = 0x40000
Global Const $MB_SERVICE_NOTIFICATION_NT3X = 0x40000
;~ Global Const $MB_SETFOREGROUND = 0x10000
;~ Global Const $MB_SYSTEMMODAL = 0x1000
;~ Global Const $MB_TASKMODAL = 0x2000
;~ Global Const $MB_TOPMOST = 0x40000
Global Const $MB_TYPEMASK = 0xF
;~ Global Const $MB_USEGLYPHCHARS = 0x4
;~ Global Const $MB_USERICON = 0x80
;~ Global Const $MB_YESNO = 0x4
;~ Global Const $MB_YESNOCANCEL = 0x3
#EndRegion Global Variables
A
Alofa
Гость
Оригинально.Skif_off сказал(а):
NONer сказал(а):
Код:
#pragma compile(AutoItExecuteAllowed, True)
Local $iWinFlag = 4097
Local $sWinTitle = 'Сообщение'
Local $sWinText = 'Какой-то текст'
Local $iWinTimeout = 20
;Local $hWinHandle =
$isSend = _MsgBoxTimer($iWinFlag, $sWinTitle, $sWinText, $iWinTimeout)
Func _MsgBoxTimer($iFlag, $sTitle, $sText, $iTimeOut = 0, $hWnd = 0)
Local $sLen, $hFile, $sMBLine, $iRet
If $iTimeOut Then
$sLen = StringLen($iTimeOut & ')')
$sMBLine = '#NoTrayIcon' & @CRLF & _
'Opt("WinWaitDelay", 1)' & @CRLF & _
'$hWnd = WinWait("[CLASS:#32770;TITLE:' & $sTitle & ']", "", ' & $iTimeOut & ')' & @CRLF & _
'If Not $hWnd Then Exit' & @CRLF & _
'$sControlText = ControlGetText($hWnd, "", "Button1")' & @CRLF & _
'$iTime = ' & $iTimeOut & @CRLF & _
'ControlSetText($hWnd, "", "Button1", $sControlText & " (" & StringFormat("%-' & $sLen & 's", $iTime & ")"))' & @CRLF & _
'While $iTime > 0' & @CRLF & _
' ControlSetText($hWnd, "", "Button1", $sControlText & " (" & StringFormat("%-' & $sLen & 's", $iTime & ")"))' & @CRLF & _
' If Not WinExists($hWnd) Then ExitLoop' & @CRLF & _
' Sleep(1000)' & @CRLF & _
' $iTime -= 1' & @CRLF & _
'WEnd'
$hFile = FileOpen(@TempDir & '\MsgBoxTimer.tmp', 2)
FileWrite($hFile, $sMBLine)
FileClose($hFile)
Run(@AutoItExe & ' /AutoIt3ExecuteScript "' & @TempDir & '\MsgBoxTimer.tmp"')
EndIf
$iRet = MsgBox($iFlag, $sTitle, $sText, $iTimeOut, $hWnd)
While FileExists(@TempDir & '\MsgBoxTimer.tmp')
FileDelete(@TempDir & '\MsgBoxTimer.tmp')
WEnd
Return $iRet
EndFunc ;==>_MsgBoxTimer
