设置控件 Unicode 字符格式标志
#Include <GuiSlider.au3>
_GUICtrlSlider_SetUnicodeFormat($hWnd, $fUnicode)
$hWnd | 控件句柄 |
$fUnicode | 确定控件使用的字符集: True - 控件使用 Unicode 字符 False - 控件使用 ANSI 字符 |
成功: | 返回控件以前的 Unicode 格式标志 |
#include <GUIConstantsEx.au3>
#include <GuiSlider.au3>
$Debug_S = False ; 检查传递给函数的类名, 设置为True并输出到一个控件的句柄,用于检查它是否工作
_Main()
Func _Main()
Local $hSlider
; 创建 GUI
GUICreate("Slider Set Unicode Format", 400, 296)
$hSlider = GUICtrlCreateSlider(2, 2, 396, 20, BitOR($TBS_TOOLTIPS, $TBS_AUTOTICKS, $TBS_ENABLESELRANGE))
GUISetState()
; 获取 Unicode 格式
MsgBox(4160, "信息", "Unicode Format: " & _GUICtrlSlider_GetUnicodeFormat($hSlider))
; 设置 Unicode 格式
MsgBox(4160, "信息", "Previous Unicode Format: " & _GUICtrlSlider_SetUnicodeFormat($hSlider, False))
; 获取 Unicode 格式
MsgBox(4160, "信息", "Unicode Format: " & _GUICtrlSlider_GetUnicodeFormat($hSlider))
; 循环直到用户退出
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
GUIDelete()
EndFunc ;==>_Main