Автор Тема: Перезапуск скрипта с окошком  (Прочитано 3416 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн (-_-) [?]

  • Новичок
  • *
  • Сообщений: 9
  • Репутация: 0
    • Награды
Версия AutoIt: 3.

Описание:
Нужно сделать следуюшее:

имеется вот это:

MouseMove(0,331,100)
MouseMove(1000,331,100)
MsgBox(36, 'Внимание...', 'Скрипт будет перезапушен.')

Нужно следующее
1. Чтоб при нажатии на кнопку да скрипт перезапустился  при нажатии на кнопку нет он завершил свою работу
2. Если пользователь не предпринимает ни каких действий в течении 60 секунд то скрипт сам за себя нажал на кнопку да
3. На кнопке Да шол таймер 60 секунд (Время отображалось примерно так: Да(60).......Да(59).....и т.д.)

P.S.: ОЧЕНЬ НУЖНО

Русское сообщество AutoIt

Перезапуск скрипта с окошком
« Отправлен: Апрель 28, 2011, 23:24:12 »

Оффлайн VladUs [?]

  • AutoIt Гуру
  • *****
  • Сообщений: 621
  • Репутация: 180
  • Пол: Мужской
    • Награды
Re: Перезапуск скрипта с окошком
« Ответ #1, Отправлен: Апрель 29, 2011, 00:43:03 »
Код: AutoIt [Выделить]
#include <GUIConstantsEx.au3>

Global  $i = 60

_Mouse()

$hgui = GUICreate('Внимание...', 280,80)
$hlab = GUICtrlCreateLabel("Скрипт будет перезапушен.",50,10)
$hButtonYes = GUICtrlCreateButton("Да", 10,40,120,30)
$hButtonNo= GUICtrlCreateButton("Нет", 140,40,120,30)
GUISetState()

AdlibRegister("_Timer",1000)

While 1
 $msg = GUIGetMsg()
Select
  Case $msg = $GUI_EVENT_CLOSE
      Exit
  Case $msg = $hButtonYes
    AdlibUnRegister("_Timer")
    GUICtrlSetData ( $hButtonYes,"Да")
    _Mouse()
    $i = 60
    AdlibRegister("_Timer",1000)
   Case $msg = $hButtonNo
     Exit
EndSelect
 
WEnd

Func _Timer()
 $i -=1
 GUICtrlSetData ( $hButtonYes,String( $i ))
 If $i = 0 Then
   GUICtrlSetData ( $hButtonYes,"Да")  
  _Mouse()
  $i = 60
EndIf
EndFunc

Func _Mouse()
MouseMove(0,331,100)
MouseMove(1000,331,100)
EndFunc

« Последнее редактирование: Апрель 29, 2011, 02:19:49 от VladUs »
Делай что должен и  будь что будет

Оффлайн (-_-) [?]

  • Новичок
  • *
  • Сообщений: 9

  • Автор темы
  • Репутация: 0
    • Награды
Re: Перезапуск скрипта с окошком
« Ответ #2, Отправлен: Апрель 29, 2011, 02:59:54 »
VladUs СПАСИБО ТЕБЕ ОГРОМНОЕ. А можно сделать так чтоб он как перезапустился окошечко закрылось автоматически

Оффлайн VladUs [?]

  • AutoIt Гуру
  • *****
  • Сообщений: 621
  • Репутация: 180
  • Пол: Мужской
    • Награды
Re: Перезапуск скрипта с окошком
« Ответ #3, Отправлен: Апрель 29, 2011, 03:17:53 »
Код: AutoIt [Выделить]
#include <GUIConstantsEx.au3>

Global  $i = 60

_Mouse()

$hgui = GUICreate('Внимание...', 280,80)
$hlab = GUICtrlCreateLabel("Скрипт будет перезапушен.",50,10)
$hButtonYes = GUICtrlCreateButton("Да", 10,40,120,30)
$hButtonNo= GUICtrlCreateButton("Нет", 140,40,120,30)
GUISetState()

AdlibRegister("_Timer",1000)

While 1
 $msg = GUIGetMsg()
Select
  Case $msg = $GUI_EVENT_CLOSE
      Exit
  Case $msg = $hButtonYes
   
    AdlibUnRegister("_Timer")
    GUICtrlSetData ( $hButtonYes,"Да")
    WinSetState($hgui,"",@SW_HIDE)
    _Mouse()
    WinSetState($hgui,"",@SW_SHOW)
    $i = 60
    AdlibRegister("_Timer",1000)
   Case $msg = $hButtonNo
     Exit
EndSelect
 
WEnd

Func _Timer()
 $i -=1
 GUICtrlSetData ( $hButtonYes,String( $i ))
 If $i = 0 Then
   GUICtrlSetData ( $hButtonYes,"Да")  
   WinSetState($hgui,"",@SW_HIDE)
  _Mouse()
  WinSetState($hgui,"",@SW_SHOW)
  $i = 60
 
EndIf
EndFunc

Func _Mouse()
MouseMove(0,331,100)
MouseMove(1000,331,100)
EndFunc


Русское сообщество AutoIt

Re: Перезапуск скрипта с окошком
« Ответ #3 Отправлен: Апрель 29, 2011, 03:17:53 »

 

Похожие темы

  Тема / Автор Ответов Последний ответ
13 Ответов
7292 Просмотров
Последний ответ Февраль 10, 2010, 07:39:25
от SyDr
5 Ответов
6181 Просмотров
Последний ответ Апрель 28, 2011, 22:00:08
от Kaster
3 Ответов
2696 Просмотров
Последний ответ Сентябрь 02, 2011, 19:28:52
от Zaramot
6 Ответов
3519 Просмотров
Последний ответ Февраль 01, 2012, 01:54:01
от komorov74
3 Ответов
2648 Просмотров
Последний ответ Сентябрь 05, 2012, 15:56:03
от Drombun
6 Ответов
2844 Просмотров
Последний ответ Декабрь 27, 2012, 17:52:09
от DesMono
8 Ответов
3959 Просмотров
Последний ответ Январь 15, 2014, 21:17:34
от madmasles
4 Ответов
1436 Просмотров
Последний ответ Январь 27, 2015, 20:44:55
от FADY
2 Ответов
921 Просмотров
Последний ответ Август 22, 2016, 13:17:15
от Maxlinus
1 Ответов
285 Просмотров
Последний ответ Май 17, 2018, 00:38:40
от Alofa