在GUI上创建一个滑动条(Slider)控件.
GUICtrlCreateSlider ( 左侧, 顶部 [, 宽度 [, 高度 [, 样式 [, 扩展样式]]]] )
左侧 | 控件左侧的位置.若此值为 -1 则根据 GUICoordMode 的设置来计算左侧位置. |
顶部 | 控件上方的位置.若此值为 -1 则根据 GUICoordMode 的设置来计算上方位置. |
宽度 | [可选参数] 控件的宽度(默认值(default)为上一个控件的宽度). |
高度 | [可选参数] 控件的高度(默认值(default)为上一个控件的高度). |
样式 | [可选参数] 指定控件的样式.请查看附录中关于 GUI 控件样式 的说明. 默认值(default)(-1):$TBS_AUTOTICKS |
扩展样式 | [可选参数] 指定控件的扩展样式.请查看附录的 扩展样式表. |
成功: | 返回新控件的控件标识符(控件ID). |
失败: | 返回值为 0. |
#include <GUIConstantsEx.au3>
Example()
Func Example()
Local $slider1, $button, $msg
GUICreate("slider", 220, 100, 100, 200)
GUISetBkColor(0x00E0FFFF) ; will change background color
$slider1 = GUICtrlCreateSlider(10, 10, 200, 20)
GUICtrlSetLimit(-1, 200, 0) ; change min/max value
$button = GUICtrlCreateButton("Value?", 75, 70, 70, 20)
GUISetState()
GUICtrlSetData($slider1, 45) ; set cursor
Do
$msg = GUIGetMsg()
If $msg = $button Then
MsgBox(4096, "slider1", GUICtrlRead($slider1), 2)
EndIf
Until $msg = $GUI_EVENT_CLOSE
EndFunc ;==>Example