Что нового

Переход на следующую Func

CreatiK

Новичок
Сообщения
93
Репутация
4
При нажатии на Button Надо чтобы началась функция и после окончания, началась другая автоматически.
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
CreatiK
Так?
Код:
;...
;...
While 1
    $msg = GUIGetMsg()
    Switch $msg
        Case $aButton
            _MyFunc_1()
            _MyFunc_2()
            _MyFunc_3()
            ;...
            _MyFunc_n()
            TrayTip('Super proga', 'Все функции закончили свою работу.', 5, 1)
			Sleep(5000)
			Exit
			;...
 
Автор
C

CreatiK

Новичок
Сообщения
93
Репутация
4
madmasles сказал(а):
CreatiK
Так?
Код:
;...
While 1
	$msg = GUIGetMsg()
	Switch $msg
		Case $aButton
			_MyFunc_1()
			_MyFunc_2()
			_MyFunc_3()
			;...
			_MyFunc_n()
			;...

Да так. Хочу спросить будет законченна _MyFunc_1() и начнется _MyFunc_2()
 
Автор
C

CreatiK

Новичок
Сообщения
93
Репутация
4
madmasles а можно сделать чтобы после окончании всех функций в трее высвечивалось окно? типо что операции законченны
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
CreatiK [?]
а можно сделать чтобы после окончании всех функций в трее высвечивалось окно?
Можно, я добавил в первый ответ TrayTip().
 
Автор
C

CreatiK

Новичок
Сообщения
93
Репутация
4
Спасибо. Как делается процесс бар? сколько пробовал сделать так и не получилось. Можно полосочкой или в %
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
CreatiK [?]
Как делается процесс бар?
Попробуйте так:
Код:
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

$sTitle = 'My Super proga'
$iFunc = 25
$iPercent = 100 / $iFunc

$hGui = GUICreate($sTitle, 350, 120, -1, -1)
$Button = GUICtrlCreateButton('G O !', 120, 20, 100, 30)
$Progress = GUICtrlCreateProgress(10, 70, 330, 17)
$Label = GUICtrlCreateLabel('', 10, 100, 100, 17)
GUISetState()


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button
			GUISetState(@SW_DISABLE)
			For $i = 1 To $iFunc
				_MyFunc()
				GUICtrlSetData($Label, Round($i * $iPercent) & ' %')
				GUICtrlSetData($Progress, Round($i * $iPercent))
			Next
			GUISetState(@SW_ENABLE)
			GUICtrlSetData($Label, 'End')
			GUICtrlSetData($Progress, 0)
			TrayTip($sTitle, 'Все функции (' & $iFunc & ' штук) закончили свою работу.', 5, 1)
	EndSwitch
WEnd

Func _MyFunc()
	Sleep(500)
EndFunc   ;==>_MyFunc
 
Верх