检索控件的文本背景颜色
#Include <GuiListView.au3>
_GUICtrlListView_GetTextBkColor($hWnd)
$hWnd | 控件句柄 |
返回文本的背景颜色 |
#include <GUIConstantsEx.au3>
#include <GuiListView.au3>
#include <Constants.au3>
$Debug_LV = False ; 检查传递给 ListView 函数的类名, 设置为True并输出到一个控件的句柄,用于检查它是否工作
_Main()
Func _Main()
Local $hListView
GUICreate("ListView Get Text BkColor", 400, 300)
$hListView = GUICtrlCreateListView("", 2, 2, 394, 268)
GUISetState()
; 设置颜色
_GUICtrlListView_SetBkColor($hListView, $CLR_MONEYGREEN)
_GUICtrlListView_SetTextColor($hListView, $CLR_BLACK)
_GUICtrlListView_SetTextBkColor($hListView, $CLR_MONEYGREEN)
; 添加列
_GUICtrlListView_AddColumn($hListView, "Items", 100)
; 添加项目
_GUICtrlListView_BeginUpdate($hListView)
For $iI = 1 To 10
_GUICtrlListView_AddItem($hListView, "Item " & $iI)
Next
_GUICtrlListView_EndUpdate($hListView)
; 显示颜色
MsgBox(4160, "信息", "Back Color ....: " & _GUICtrlListView_GetBkColor($hListView) & @CRLF & _
"Text Color ....: " & _GUICtrlListView_GetTextColor($hListView) & @CRLF & _
"Text Back Color: " & _GUICtrlListView_GetTextBkColor($hListView))
; 循环直到用户退出
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
GUIDelete()
EndFunc ;==>_Main