Viktor1703
AutoIT Гуру
- Сообщения
- 1,535
- Репутация
- 413
AutoIt: 3.3.6.1
Версия: 1.0
Категория: Элементы GUI
Описание: Библиотека для создания не стандартного ProgressBar'a
Код/Пример:
Файл: GUIControlProgress
Снимок: --
История версий:
Источник: --
Автор(ы): Viktor1703
Версия: 1.0
Категория: Элементы GUI
Описание: Библиотека для создания не стандартного ProgressBar'a
Код/Пример:
Код:
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <GUIControlProgress.au3>
Global Const $PBS_SMOOTH = 1
$hForm = GUICreate("ControlProgress", 240, 50)
GUISetBkColor(0x000000)
$iProgress = GUIControlProgress_Create($hForm, 20, 20, 200, 12, True, $PBS_SMOOTH, $WS_EX_DLGMODALFRAME)
GUIControlProgress_SetRange32($iProgress, 100)
GUIControlProgress_SetBarColor($iProgress, 0xEAD575)
GUIControlProgress_SetBkColor($iProgress, 0x535C00)
GUISetState()
For $i = 1 To GUIControlProgress_GetRange($iProgress) Step 1
GUIControlProgress_SetStep($iProgress)
$iPos = GUIControlProgress_SetPos($iProgress, $i)
GUIControlProgress_SetPit($iProgress, $iPos)
ConsoleWrite("Position: " & GUIControlProgress_GetPos($iProgress) & @CRLF)
Sleep(20)
Next
;GUIControlProgress_Delete($iProgress)
While 1
If GUIGetMsg() = -3 Then Exit
WEnd
Файл: GUIControlProgress
Снимок: --
История версий:
v 1.0
Источник: --
Автор(ы): Viktor1703