工具栏中的AddString 能否设置字符串的字体样式【已解决】

xwt620 · 发表于 2011-11-22 14:26:17

本帖最后由 xwt620 于 2011-11-28 23:21 编辑

也就是和GUICtrlSetFont作用一样，只是试过这个方法，可惜不行。。

xupromise · 发表于 2011-11-22 16:27:12

(菜鸟一枚) GUI里面貌似只能用Font来设置字体样式。坐等学习围观。

netegg · 发表于 2011-11-22 17:23:09

gdiplus自己画

xwt620 · 发表于 2011-11-22 22:48:00

回复 3# netegg

怎么画啊？

3mile · 发表于 2011-11-23 10:48:10

#include <GuiToolbar.au3>
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Constants.au3>
#include <winapiex.au3>
#include <FontConstants.au3>

Opt('MustDeclareVars', 1)

$Debug_TB = False ; 检查传递给函数的类名, 设置为真并使用另一控件的句柄观察其工作

_Main()

Func _Main()
        Local $hGUI, $hToolbar, $aStrings[4], $hFont
        Local Enum $idNew = 1000, $idOpen, $idSave, $idHelp

        ; 创建界面
        $hGUI = GUICreate("Toolbar", 400, 300)
        $hToolbar = _GUICtrlToolbar_Create($hGUI)
        GUISetState()

        ; 添加标准系统位图
        _GUICtrlToolbar_AddBitmap($hToolbar, 1, -1, $IDB_STD_LARGE_COLOR)

        ; 添加字符串
        $aStrings[0] = _GUICtrlToolbar_AddString($hToolbar, "新建(&N)")
        $aStrings[1] = _GUICtrlToolbar_AddString($hToolbar, "&Open")
        $aStrings[2] = _GUICtrlToolbar_AddString($hToolbar, "&Save")
        $aStrings[3] = _GUICtrlToolbar_AddString($hToolbar, "&Help")

        ; 添加按钮
        _GUICtrlToolbar_AddButton($hToolbar, $idNew, $STD_FILENEW, $aStrings[0])
        _GUICtrlToolbar_AddButton($hToolbar, $idOpen, $STD_FILEOPEN, $aStrings[1])
        _GUICtrlToolbar_AddButton($hToolbar, $idSave, $STD_FILESAVE, $aStrings[2])
        _GUICtrlToolbar_AddButtonSep($hToolbar)
        _GUICtrlToolbar_AddButton($hToolbar, $idHelp, $STD_HELP, $aStrings[3])
        
        ;设置字体
        $hFont = _WinAPI_CreateFont(16, 0, 0, 0, 400, False, False, False, $DEFAULT_CHARSET, $OUT_DEFAULT_PRECIS, $CLIP_DEFAULT_PRECIS, $DEFAULT_QUALITY, 0, '黑体')
        _WinAPI_SetFont($hToolbar, $hFont, True)


        ; 循环至用户退出
        Do
        Until GUIGetMsg() = $GUI_EVENT_CLOSE

EndFunc   ;==>_Main

menfan1 · 发表于 2011-11-23 10:50:45

呵呵有好看点的工具栏吗

xwt620 · 发表于 2011-11-24 00:56:25

本帖最后由 xwt620 于 2011-11-24 01:05 编辑

回复3笑 5# 3mile

试过你的方法，还是不行。。。
我还试过GUISetFont，最终还是以失败告终。。
不知道是不是用的方法不对。。

Local $font = "Comic Sans MS"
                GUISetFont(9, 400, 4, $font)

3mile · 发表于 2011-11-24 09:57:11

回复 7# xwt620

xwt620 · 发表于 2011-11-24 20:50:47

回复 8# 3mile

难道是我的机器问题？

		自动登录	找回密码
密码			加入

[AU3基础] 工具栏中的AddString 能否设置字符串的字体样式【已解决】

相关帖子

本帖子中包含更多资源