2.0
3.0
>
comp
>
gb.qt4
>
dialog
>
selectfont
前一个
下一个
编辑
重命名
撤销
刷新
搜索
管理
文档
历史
Dialog.SelectFont (gb.qt4)
Static
Function
SelectFont
(
)
As
Boolean
调用标准字体对话框。
如果用户点击取消按钮返回
TRUE
,如果用户点击确定按钮返回
FALSE
。
本例设置
TextArea
的
字体
为用户选择的字体。如果用户取消对话框,那么字体不会被更新。
Example
PUBLIC SUB ButtonFont_Click()
Dialog.Font = TextAreaEdit.Font
IF Dialog.SelectFont() THEN RETURN
TextAreaEdit.Font = Dialog.Font
END