函数参考

_GUICtrlTab_SetExtendedStyle

设置当前使用的扩展样式

#Include <GuiTab.au3>
_GUICtrlTab_SetExtendedStyle($hWnd, $iStyle)

参数

$hWnd 控件句柄
$iStyle 返回目前使用的扩展样式:
$TCS_EX_FLATSEPARATORS - 控件标签项目之间将绘制分隔符
$TCS_EX_REGISTERDROP - 当对象被拖到标签项目,
控件生成 TCN_GETOBJECT 通知消息,以请求放置拖放目标对象.

返回值

成功: 返回先前的扩展样式

注意/说明

None.

相关

_GUICtrlTab_GetExtendedStyle

示例/演示


#include <GUIConstantsEx.au3>
#include <GuiTab.au3>

$Debug_TAB = False ; 检查传递给函数的类名, 设置为True并输出到一个控件的句柄,用于检查它是否工作

_Main()

Func _Main()
    Local $hTab

    ; 创建 GUI
    GUICreate("Tab Control Set Extended Style", 400, 300)
    $hTab = GUICtrlCreateTab(2, 2, 396, 296, BitOR($TCS_BUTTONS, $TCS_FLATBUTTONS))
    GUISetState()

    ; 添加标签
    _GUICtrlTab_InsertItem($hTab, 0, "Tab 1")
    _GUICtrlTab_InsertItem($hTab, 1, "Tab 2")
    _GUICtrlTab_InsertItem($hTab, 2, "Tab 3")

    ; Get/Set extended styles
    _GUICtrlTab_SetExtendedStyle($hTab, $TCS_EX_FLATSEPARATORS)
    MsgBox(4160, "信息", "Extended styles: 0x" & Hex(_GUICtrlTab_GetExtendedStyle($hTab)))

    ; 循环直到用户退出
    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE
    GUIDelete()
EndFunc   ;==>_Main