以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 求代码获取所有字体和字体大小的方法; (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=47296) |
-- 作者:ndxfke -- 发布时间:2014/3/7 17:18:00 -- 求代码获取所有字体和字体大小的方法; 我想用代码做个 字体和字号 下拉选项,用代码怎么获取到这两项系统的所有值呢? |
-- 作者:Bin -- 发布时间:2014/3/7 17:23:00 -- Dim lg As New Windows.forms.FontDialog If lg.showdialog = DialogResult.OK Then output.show(lg.font.Tostring()) End If
|
-- 作者:ndxfke -- 发布时间:2014/3/7 17:54:00 -- Run出来的结果:[Font: Name=宋体, Size=9, Units=3, GdiCharSet=134, GdiVerticalFont=False] 我怎么取值呢。 我加载到list就简单了,呵! |
-- 作者:Bin -- 发布时间:2014/3/7 18:00:00 -- Dim lg As New Windows.forms.FontDialog If lg.showdialog = DialogResult.OK Then output.show(lg.font.name) output.show(lg.font.SIZE) End If 有关FONT的属性,参考帮助http://www.foxtable.com/help/topics/0494.htm
|
-- 作者:ndxfke -- 发布时间:2014/3/8 11:01:00 -- 谢谢你 BIN |