创建控件工作区
#Include <GuiListView.au3>
_GUICtrlListView_SetWorkAreas($hWnd, $iLeft, $iTop, $iRight, $iBottom)
$hWnd | 控件句柄 |
$iLeft | 矩形左上角 X 坐标 |
$iTop | 矩形左上角 Y 坐标 |
$iRight | 矩形右下角 X 坐标 |
$iBottom | 矩形右下角 Y 坐标 |
#include <GUIConstantsEx.au3>
#include <GuiListView.au3>
#include <GuiImageList.au3>
$Debug_LV = False ; 检查传递给 ListView 函数的类名, 设置为True并输出到一个控件的句柄,用于检查它是否工作
_Main()
Func _Main()
Local $hImage, $hListView
GUICreate("ListView Set Work Areas", 400, 300)
$hListView = GUICtrlCreateListView("", 2, 2, 394, 268)
GUICtrlSetStyle($hListView, $LVS_ICON)
GUISetState()
; 加载图像
$hImage = _GUIImageList_Create()
_GUIImageList_Add($hImage, _GUICtrlListView_CreateSolidBitMap($hListView, 0xFF0000, 16, 16))
_GUIImageList_Add($hImage, _GUICtrlListView_CreateSolidBitMap($hListView, 0x00FF00, 16, 16))
_GUIImageList_Add($hImage, _GUICtrlListView_CreateSolidBitMap($hListView, 0x0000FF, 16, 16))
_GUICtrlListView_SetImageList($hListView, $hImage, 0)
; 添加列
_GUICtrlListView_AddColumn($hListView, 0, "Items", 100)
; 添加项目
_GUICtrlListView_AddItem($hListView, "Item 1", 0)
_GUICtrlListView_AddItem($hListView, "Item 2", 1)
_GUICtrlListView_AddItem($hListView, "Item 3", 2)
; Create work area
_GUICtrlListView_SetWorkAreas($hListView, 0, 0, 100, 100)
MsgBox(4160, "信息", "Work Areas: " & _GUICtrlListView_GetNumberOfWorkAreas($hListView))
; 循环直到用户退出
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
GUIDelete()
EndFunc ;==>_Main