确保列表视图项目全部或部分可见
#Include <GuiListView.au3>
_GUICtrlListView_EnsureVisible($hWnd, $iIndex[, $fPartialOK = False])
$hWnd | 控件句柄 |
$iIndex | 列表视图项目索引 |
$fPartialOK | [可选参数] 指定项目是否必须完全可见 |
成功: | 返回 True |
失败: | 返回 False |
#include <GUIConstantsEx.au3>
#include <GuiListView.au3>
$Debug_LV = False ; 检查传递给 ListView 函数的类名, 设置为True并输出到一个控件的句柄,用于检查它是否工作
_Main()
Func _Main()
Local $hListView
GUICreate("ListView Ensure Visible", 400, 300)
$hListView = GUICtrlCreateListView("Items", 2, 2, 394, 268)
_GUICtrlListView_SetColumnWidth($hListView, 0, 100)
_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
GUISetState()
_GUICtrlListView_BeginUpdate($hListView)
For $i = 1 To 100
GUICtrlCreateListViewItem("Item " & $i, $hListView)
Next
_GUICtrlListView_EndUpdate($hListView)
MsgBox(4160, "信息", "Making item 50 visible")
_GUICtrlListView_EnsureVisible($hListView, 49)
; 循环直到用户退出
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
GUIDelete()
EndFunc ;==>_Main