#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#include <GUIListBox.au3>
#include <GuiListview.au3>
#include <WinAPI.au3>
#include <GuiImageList.au3>
#Region ### START Koda GUI section ### Form=d:\autotestsystem\分页.kxf
Local $TabSheet1, $Listview, $hImage, $hListView, $hHeader
$Form1 = GUICreate("Form1", 628, 451, 192, 124)
;GUISetFont(8, 800, 0, "MS Sans Serif")
$Tab1 = GUICtrlCreateTab(8, 48, 601, 369)
GUICtrlSetFont(-1, 10, 400, 0, "Arial")
$TabSheet1 = GUICtrlCreateTabItem(" 程序出错")
$ListView = GUICtrlCreateListView("程序出错图片|程序出错提示|智能修复", 12, 75, 593, 337)
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 0, 245)
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 1, 225)
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 2, 115)
GUICtrlSendMsg($ListView, $LVM_SETEXTENDEDListviewSTYLE, $LVS_EX_GRIDLINES, $LVS_EX_GRIDLINES)
; 加载图片
$hImage = _GUIImageList_Create(240, 70)
_GUIImageList_AddBitmap($hImage, "A.bmp")
_GUIImageList_AddBitmap($hImage, "B.bmp")
_GUIImageList_AddBitmap($hImage, "C.bmp")
_GUIImageList_AddBitmap($hImage, "D.bmp")
_GUICtrlListView_SetImageList($Listview, $hImage, 1)
; 添加提示语
_GUICtrlListView_AddItem($Listview, "", 0, 1)
_GUICtrlListView_AddSubItem($Listview, 0, '提示语', 1, 1)
_GUICtrlListView_AddItem($Listview, "", 1, 2)
_GUICtrlListView_AddSubItem($Listview, 1, "提示语", 1, 1)
_GUICtrlListView_AddItem($Listview, "", 2, 2);如果要添加第三张图
_GUICtrlListView_AddSubItem($listview, 2, "提示语", 1, 1);如果要添加第三张图
_GUICtrlListView_AddItem($Listview, "", 3, 2)
_GUICtrlListView_AddSubItem($Listview, 3, '提示语', 1, 1)
;添加按钮
;_GUICtrlListView_InsertColumn($hListView, 0, "", 0)
$TabSheet2 = GUICtrlCreateTabItem("驱动故障")
$TabSheet3 = GUICtrlCreateTabItem("专业软件")
$TabSheet4 = GUICtrlCreateTabItem("缺省文件")
$TabSheet5 = GUICtrlCreateTabItem("证书报错")
$TabSheet6 = GUICtrlCreateTabItem("其它问题")
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd