[Время, дата] Помогите Как сделать чтоб действие выполнялось по таймеру ?

[max1300]

Всем привет и у меня есть такой вопрос: как сделать чтоб действие выполнялось по таймеру ?
может есть ответ пишите сюда

 

[madmasles]

max1300,

Local $iTimer, $iInterval = 5000 ;5 sec

$iTimer = TimerInit()
While 1
	If TimerDiff($iTimer) >= $iInterval Then
		If MsgBox(65, 'Info', 'Прошло ' & $iInterval / 1000 & ' секунд') = 2 Then ExitLoop
		$iTimer = TimerInit()
	EndIf
	Sleep(20)
WEnd

 

[GUIMish]

Можно создать при помощи TimerInit(), но я люблю создавать при помощи, AdlibRegister(), вот так:

AdlibRegister("func1", 5000) ;5 sec

While 1
	Sleep(100)
WEnd

Func func1()
	AdlibUnRegister("func1")
	MsgBox(0, "Информация", "Прошло 5 сек.")
EndFunc

 

[alex33]

Да, мне тоже больше нравится через AdlibRegister