Выполнение команды через 3 минуты, полоса прогресса

Deex · 9 Мар 2016

Версия AutoIt: Version 3.5.4 3.

Описание:
Здравствуйте!

Помогите привязать таймер к полосе прогресса, по истечение которого должна выполниться CMD команда

Код:

Run("shutdown.exe -s -f -t 0")

Спасибо

Код:

#NoTrayIcon

#include <GuiConstantsEx.au3>


GUICreate("Выключение компьютера", 400, 140)
GUISetIcon(@SystemDir & "\shell32.dll", 21)

;Полоса процесса
GUICtrlCreateProgress(20, 70, 360, 10)
GUICtrlSetData(-1, 100)

;Иконка в тексте
GUICtrlCreateIcon("shell32.dll", 16, 20, 20)

;Текст
GUICtrlCreateLabel("Ваш компьютер выключится через 3 минуты, вы может отменить этот процесс", 70, 25, 300, 30)

;Кнопка отмены
Local $idCancel = GUICtrlCreateButton("Отмена", 150, 95, 100, 30)


GUISetState(@SW_SHOW)
While 1
   Switch GUIGetMsg()
	  Sleep (1000)
	  Case $GUI_EVENT_CLOSE, $idCancel
		 ExitLoop



;Run("shutdown.exe -s -f -t 0")

   EndSwitch
WEnd

GUIDelete()

Garrett · 9 Мар 2016

Deex

Код:

#NoTrayIcon

#include <GuiConstantsEx.au3>


GUICreate("Выключение компьютера", 400, 140)
GUISetIcon(@SystemDir & "\shell32.dll", 21)

;Полоса процесса
$iProgress = GUICtrlCreateProgress(20, 70, 360, 10)
GUICtrlSetData(-1, 100)

;Иконка в тексте
GUICtrlCreateIcon("shell32.dll", 16, 20, 20)

;Текст
GUICtrlCreateLabel("Ваш компьютер выключится через 3 минуты, вы может отменить этот процесс", 70, 25, 300, 30)

;Кнопка отмены
Local $idCancel = GUICtrlCreateButton("Отмена", 150, 95, 100, 30)


GUISetState(@SW_SHOW)
While 1
   Switch GUIGetMsg()
      Sleep (1000)
      Case $GUI_EVENT_CLOSE, $idCancel
         ExitLoop
   EndSwitch
   If GUICtrlRead($idProgressbar1) = 100 Then Run("shutdown.exe -s -f -t 0")
WEnd

GUIDelete()

Deex · 9 Мар 2016

Garrett сказал(а):

Deex

Код:

#NoTrayIcon

#include <GuiConstantsEx.au3>


GUICreate("Выключение компьютера", 400, 140)
GUISetIcon(@SystemDir & "\shell32.dll", 21)

;Полоса процесса
$iProgress = GUICtrlCreateProgress(20, 70, 360, 10)
GUICtrlSetData(-1, 100)

;Иконка в тексте
GUICtrlCreateIcon("shell32.dll", 16, 20, 20)

;Текст
GUICtrlCreateLabel("Ваш компьютер выключится через 3 минуты, вы может отменить этот процесс", 70, 25, 300, 30)

;Кнопка отмены
Local $idCancel = GUICtrlCreateButton("Отмена", 150, 95, 100, 30)


GUISetState(@SW_SHOW)
While 1
   Switch GUIGetMsg()
      Sleep (1000)
      Case $GUI_EVENT_CLOSE, $idCancel
         ExitLoop
   EndSwitch
   If GUICtrlRead($idProgressbar1) = 100 Then Run("shutdown.exe -s -f -t 0")
WEnd

GUIDelete()

Скорее всего я не правильно выразился, мне нужно чтобы полоса прогресса заполнилась за 3 минуты и если в течение этих трех минут не была нажата кнопка "Отмена", выполнить команду выключения компьютера

Garrett · 9 Мар 2016

Deex [?]

мне нужно чтобы полоса прогресса заполнилась за 3 минуты и если в течение этих трех минут не была нажата кнопка "Отмена", выполнить команду выключения компьютера

Код:

#NoTrayIcon
#include <Misc.au3>
#include <WinAPISys.au3>
#include <GuiConstantsEx.au3>
OnAutoItExitRegister("_Exit")

Global $i
Local $hTimerProc = DllCallbackRegister('_TimerProc', 'none', 'hwnd;uint;uint_ptr;dword')
Local $iTimerID = _WinAPI_SetTimer(0, 0, 1800, DllCallbackGetPtr($hTimerProc))

GUICreate("Выключение компьютера", 400, 140)
GUISetIcon(@SystemDir & "\shell32.dll", 21)

;Полоса процесса
$iProgress = GUICtrlCreateProgress(20, 70, 360, 10)

;Иконка в тексте
GUICtrlCreateIcon("shell32.dll", 16, 20, 20)
;Текст
GUICtrlCreateLabel("Ваш компьютер выключится через 3 минуты, вы может отменить этот процесс", 70, 25, 300, 30)
;Кнопка отмены
Local $iButton = GUICtrlCreateButton("Отмена", 150, 95, 100, 30)
GUISetState(@SW_SHOW)

While 1
   Switch GUIGetMsg()
	  Case $GUI_EVENT_CLOSE, $iButton
	  Exit
   EndSwitch
   If (GUICtrlRead($iProgress) = 100) Then ExitLoop
WEnd

GUIDelete()
;Run("shutdown.exe -s -f -t 0")
Run("notepad.exe")

Func _TimerProc($hWnd, $iMsg, $iTimerId, $iTime)
   #forceref $hWnd, $iMsg, $iTimerId, $iTime
   $i += 1
   GUICtrlSetData($iProgress, Ceiling($i))
EndFunc   ;==>_TimerProc

Func _Exit()
   _WinAPI_KillTimer(0, $iTimerID)
   DllCallbackFree($hTimerProc)
EndFunc   ;==>_Exit

Deex · 11 Мар 2016

Garrett сказал(а):

Deex [?]

мне нужно чтобы полоса прогресса заполнилась за 3 минуты и если в течение этих трех минут не была нажата кнопка "Отмена", выполнить команду выключения компьютера

Код:

#NoTrayIcon
#include <Misc.au3>
#include <WinAPISys.au3>
#include <GuiConstantsEx.au3>
OnAutoItExitRegister("_Exit")

Global $i
Local $hTimerProc = DllCallbackRegister('_TimerProc', 'none', 'hwnd;uint;uint_ptr;dword')
Local $iTimerID = _WinAPI_SetTimer(0, 0, 1800, DllCallbackGetPtr($hTimerProc))

GUICreate("Выключение компьютера", 400, 140)
GUISetIcon(@SystemDir & "\shell32.dll", 21)

;Полоса процесса
$iProgress = GUICtrlCreateProgress(20, 70, 360, 10)

;Иконка в тексте
GUICtrlCreateIcon("shell32.dll", 16, 20, 20)
;Текст
GUICtrlCreateLabel("Ваш компьютер выключится через 3 минуты, вы может отменить этот процесс", 70, 25, 300, 30)
;Кнопка отмены
Local $iButton = GUICtrlCreateButton("Отмена", 150, 95, 100, 30)
GUISetState(@SW_SHOW)

While 1
   Switch GUIGetMsg()
	  Case $GUI_EVENT_CLOSE, $iButton
	  Exit
   EndSwitch
   If (GUICtrlRead($iProgress) = 100) Then ExitLoop
WEnd

GUIDelete()
;Run("shutdown.exe -s -f -t 0")
Run("notepad.exe")

Func _TimerProc($hWnd, $iMsg, $iTimerId, $iTime)
   #forceref $hWnd, $iMsg, $iTimerId, $iTime
   $i += 1
   GUICtrlSetData($iProgress, Ceiling($i))
EndFunc   ;==>_TimerProc

Func _Exit()
   _WinAPI_KillTimer(0, $iTimerID)
   DllCallbackFree($hTimerProc)
EndFunc   ;==>_Exit

Огромное спасибо!
Скрипт работает :laugh:, но только после компиляции в exe, файл при запуске выдает ошибку

Autoit error - unable to open the script file

Может я не правильно компилирую?
Добавлено:
Сообщение автоматически объединено: 11 Мар 2016

Deex сказал(а):
Garrett сказал(а):

Deex [?]

мне нужно чтобы полоса прогресса заполнилась за 3 минуты и если в течение этих трех минут не была нажата кнопка "Отмена", выполнить команду выключения компьютера

Нажмите, чтобы раскрыть...

Код:

#NoTrayIcon #include <Misc.au3> #include <WinAPISys.au3> #include <GuiConstantsEx.au3> OnAutoItExitRegister("_Exit") Global $i Local $hTimerProc = DllCallbackRegister('_TimerProc', 'none', 'hwnd;uint;uint_ptr;dword') Local $iTimerID = _WinAPI_SetTimer(0, 0, 1800, DllCallbackGetPtr($hTimerProc)) GUICreate("Выключение компьютера", 400, 140) GUISetIcon(@SystemDir & "\shell32.dll", 21) ;Полоса процесса $iProgress = GUICtrlCreateProgress(20, 70, 360, 10) ;Иконка в тексте GUICtrlCreateIcon("shell32.dll", 16, 20, 20) ;Текст GUICtrlCreateLabel("Ваш компьютер выключится через 3 минуты, вы может отменить этот процесс", 70, 25, 300, 30) ;Кнопка отмены Local $iButton = GUICtrlCreateButton("Отмена", 150, 95, 100, 30) GUISetState(@SW_SHOW) While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE, $iButton Exit EndSwitch If (GUICtrlRead($iProgress) = 100) Then ExitLoop WEnd GUIDelete() ;Run("shutdown.exe -s -f -t 0") Run("notepad.exe") Func _TimerProc($hWnd, $iMsg, $iTimerId, $iTime) #forceref $hWnd, $iMsg, $iTimerId, $iTime $i += 1 GUICtrlSetData($iProgress, Ceiling($i)) EndFunc ;==>_TimerProc Func _Exit() _WinAPI_KillTimer(0, $iTimerID) DllCallbackFree($hTimerProc) EndFunc ;==>_Exit

Нажмите, чтобы раскрыть...

Огромное спасибо!
Скрипт работает :laugh:, но только после компиляции в exe, файл при запуске выдает ошибку

Autoit error - unable to open the script file

Может я не правильно компилирую?

Нашел в чем причина, если я компилирую скрипт для 32 разрядной системы (x86) и запускаю exe файл под 64 разрядной системой, то появляется ошибка Autoit error - unable to open the script file, если компилирую под x64 то ошибки нет.

Есть решение как сделать универсальный скрипт и под 32 и под 64?

Garrett · 11 Мар 2016

Deex [?]

Есть решение как сделать универсальный скрипт и под 32 и под 64?

Директивы AutoIt3Wrapper

Код:

#AutoIt3Wrapper_Compile_Both = y

Deex · 11 Мар 2016

Garrett сказал(а):
Deex [?]

Есть решение как сделать универсальный скрипт и под 32 и под 64?

Нажмите, чтобы раскрыть...

Директивы AutoIt3Wrapper

Код:

#AutoIt3Wrapper_Compile_Both = y

Огромное Спасибо!
:smile:

Deex · 1 Апр 2016

Здравствуйте!

Возможно ли данный скрипт расположить поверх всех окон?

Garrett · 1 Апр 2016

Deex [?]

Возможно ли данный скрипт расположить поверх всех окон?

$WS_EX_TOPMOST

Автор темы	Похожие темы	Форум	Ответы	Дата
W	Слежение за изменением файла и выполнение команды	Общие вопросы по AutoIt	1	15 Ноя 2017
N	Зацикливание появление разных окон в скрипте с выполнением команды	Общие вопросы по AutoIt	4	28 Июл 2015
	[Файловая система] Выполнение команды DOS	Общие вопросы по AutoIt	3	6 Июл 2015
	Выполнение команды в консоли	Общие вопросы по AutoIt	2	20 Янв 2015
	Перенесено: Выполнение одной кнопкой 4 команды	Общие вопросы по AutoIt	0	21 Июн 2014

Поиск

Поиск

Выполнение команды через 3 минуты, полоса прогресса

Deex

Новичок

Garrett

Модератор

Deex

Новичок

Garrett

Модератор

Deex

Новичок

Garrett

Модератор

Deex

Новичок

Deex

Новичок

Garrett

Модератор