|
本帖最后由 solo_k 于 2013-4-7 00:32 编辑
类似于这样的
#AutoIt3Wrapper_au3check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
#include <GuiConstantsEx.au3>
#include <GuiTab.au3>
#include <GuiImageList.au3>
Opt('MustDeclareVars', 1)
$Debug_TAB = False ; 检查传递给函数的类名, 设置为真并使用另一控件句柄观察其工作
_Main()
Func _Main()
Local $hGUI, $hImage, $hTab,$hTab1
; 创建界面
$hGUI = GUICreate("Tab Control Item Image", 400, 300)
$hTab = GUICtrlCreateTab(2, 2, 396, 296)
GUISetState()
; 创建图像
$hImage = _GUIImageList_Create()
_GUIImageList_Add($hImage, _WinAPI_CreateSolidBitmap($hGUI, 0xFF0000, 16, 16))
_GUIImageList_Add($hImage, _WinAPI_CreateSolidBitmap($hGUI, 0x00FF00, 16, 16))
_GUIImageList_Add($hImage, _WinAPI_CreateSolidBitmap($hGUI, 0x0000FF, 16, 16))
_GUICtrlTab_SetImageList($hTab, $hImage)
; 添加标签页
_GUICtrlTab_InsertItem($hTab, 0, "Tab 1")
_GUICtrlTab_InsertItem($hTab, 1, "Tab 2")
$hTab1 = GUICtrlCreateTab(32, 32, 296, 196)
_GUICtrlTab_InsertItem($hTab1, 1, "Tab 2222")
_GUICtrlTab_InsertItem($hTab1, 1, "Tab 3333")
_GUICtrlTab_InsertItem($hTab, 2, "Tab 3")
; 获取/设置标签2的图像
_GUICtrlTab_SetItemImage($hTab, 1, 1)
;MsgBox(4160, "Information", "Tab 2 image index: " & _GUICtrlTab_GetItemImage($hTab, 1))
; 循环至用户退出
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
GUIDelete()
EndFunc ;==>_Main
如代码所示,为何$hTab1 创建不了呢 |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有账号?加入
×
|