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

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

本帖最后由 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, $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 = _GUICtrlToolbar_AddString($hToolbar, "新建(&N)")
        $aStrings = _GUICtrlToolbar_AddString($hToolbar, "&Open")
        $aStrings = _GUICtrlToolbar_AddString($hToolbar, "&Save")
        $aStrings = _GUICtrlToolbar_AddString($hToolbar, "&Help")

        ; 添加按钮
        _GUICtrlToolbar_AddButton($hToolbar, $idNew, $STD_FILENEW, $aStrings)
        _GUICtrlToolbar_AddButton($hToolbar, $idOpen, $STD_FILEOPEN, $aStrings)
        _GUICtrlToolbar_AddButton($hToolbar, $idSave, $STD_FILESAVE, $aStrings)
        _GUICtrlToolbar_AddButtonSep($hToolbar)
        _GUICtrlToolbar_AddButton($hToolbar, $idHelp, $STD_HELP, $aStrings)
       
        ;设置字体
        $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


    难道是我的机器问题？{:face (131):}
页: [1]
查看完整版本: 工具栏中的AddString 能否设置字符串的字体样式【已解决】