检索控件的 Unicode 字符格式标志
#Include <GuiTab.au3>
_GUICtrlTab_GetUnicodeFormat($hWnd)
$hWnd | 控件句柄 |
True: | 控件使用 Unicode 字符 |
False: | 控件使用 ANSI 字符 |
#include <GUIConstantsEx.au3>
#include <GuiTab.au3>
$Debug_TAB = False ; 检查传递给函数的类名, 设置为True并输出到一个控件的句柄,用于检查它是否工作
_Main()
Func _Main()
Local $bFormat, $hTab
; 创建 GUI
GUICreate("Tab Control Get Unicode Format", 400, 300)
$hTab = GUICtrlCreateTab(2, 2, 396, 296)
GUISetState()
; 添加标签
_GUICtrlTab_InsertItem($hTab, 0, "Tab 1")
_GUICtrlTab_InsertItem($hTab, 1, "Tab 2")
_GUICtrlTab_InsertItem($hTab, 2, "Tab 3")
; 获取/设置 Unicode 格式
$bFormat = _GUICtrlTab_GetUnicodeFormat($hTab)
MsgBox(4160, "信息", "Unicode format: " & $bFormat)
_GUICtrlTab_SetUnicodeFormat($hTab, Not $bFormat)
MsgBox(4160, "信息", "Unicode format: " & _GUICtrlTab_GetUnicodeFormat($hTab))
; 循环直到用户退出
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
GUIDelete()
EndFunc ;==>_Main