如何实现两行 Tab ？

新手上路

AU3 默认只显示一行 Tab，如果界面显示不下时，会在左右各添加一个箭头，用来切换未能显示的 Tab。这种方式很不方便。


像下面这种显示两行 Tab ，不知道有没有办法实现？


[ 本帖最后由 新手上路 于 2008-11-27 12:39 编辑 ]

sanhen

解决了问题又不附上解决方法，不大厚道。

还是附个源码上去吧，方便新手。

#include <GUIConstantsEx.au3>
#include <TabConstants.au3>

Opt('MustDeclareVars', 1)

Example()

Func Example()

        Local $tab, $tab0, $tab1, $tab2, $tab3, $tab4, $tab5, $tab6, $tab7, $tab8 
    
        
        GUICreate("My GUI Tab")  ; will create a dialog box that when displayed is centered

        GUISetBkColor(0x00E0FFFF)
        GUISetFont(9, 300)

        $tab = GUICtrlCreateTab(10, 10, 300, 200,$TCS_MULTILINE)

        $tab0 = GUICtrlCreateTabItem("tab0")
        $tab1 = GUICtrlCreateTabItem("tab1")
        $tab2 = GUICtrlCreateTabItem("tab2")
        $tab3 = GUICtrlCreateTabItem("tab3") 
        $tab4 = GUICtrlCreateTabItem("tab4") 
        $tab5 = GUICtrlCreateTabItem("tab5") 
        $tab6 = GUICtrlCreateTabItem("tab6") 
        $tab7 = GUICtrlCreateTabItem("tab7") 
    $tab8 = GUICtrlCreateTabItem("tab8") 

    GUICtrlSetState(-1, $GUI_SHOW)         ; will be display first

        GUISetState()

        

        Do
     Until        GUIGetMsg()=-3
                
        
EndFunc   ;==>Example

新手上路

呵呵，我跟你用的的方法有点不一样：

#include <GUIConstantsEx.au3>

$tab = GUICtrlCreateTab(10, 10, 300, 200,0x0040+0x0200)

0x0040+0x0200=$TCS_MULTILINE ？

[ 本帖最后由 新手上路 于 2008-11-27 14:04 编辑 ]