插入新标签
#Include <GuiTab.au3>
_GUICtrlTab_InsertItem($hWnd, $iIndex, $sText[, $iImage = -1[, $iParam = 0]])
$hWnd | 控件句柄 |
$iIndex | 新标签的索引 |
$sText | 新标签的文本 |
$iImage | [可选参数] 新标签图像的 0 基索引 |
$iParam | [可选参数] 应用程序定义的数据 |
成功: | 返回新标签的 0 基索引 |
失败: | 返回 -1 |
#include <GUIConstantsEx.au3>
#include <GuiTab.au3>
$Debug_TAB = False ; 检查传递给函数的类名, 设置为真并使用另一控件的句柄可以看出它是否有效
_Main()
Func _Main()
Local $hTab
; 创建 GUI
GUICreate("Tab Control Insert Item", 400, 300)
$hTab = GUICtrlCreateTab(2, 2, 396, 296)
GUISetState()
; 添加标签
_GUICtrlTab_InsertItem($hTab, 0, "Tab 1")
_GUICtrlTab_InsertItem($hTab, 1, "Tab 2")
_GUICtrlTab_InsertItem($hTab, 2, "Tab 3")
; 循环直到用户退出
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
GUIDelete()
EndFunc ;==>_Main