Что нового

[Окна, Диалоги] Автоматическая смена картинок

COKOL

Новичок
Сообщения
8
Репутация
0
Всем доброго времени суток! мне нужен скрипт после запуска которого в окне программы будут меняться указанные картинки с задержкой 2 секунды!
 

Fever

Скриптер
Сообщения
308
Репутация
112
Код:
#include <Timers.au3>

Global $Time = 2

$GUI = GUICreate("Test", 300, 200)

$Pic = GUICtrlCreatePic("1.jpg", 10, 10, 280, 180)

$Timer = _Timer_Init()
GUISetState()

Do
	If _Timer_Diff($Timer)/1000 > $Time Then
		GUICtrlDelete($Pic)
		GUICtrlCreatePic(Random(1, 2, 1) & ".jpg", 10, 10, 280, 180)
		_Timer_KillAllTimers($GUI)
		$Timer = _Timer_Init()
	EndIf
Until GUIGetMsg() = -3


поставте в папку со скриптом картинки 1.jpg и 2.jpg и запускайте ;)
 
Верх