通用对话框commondialog的字体(汉字)设立
通用对话框commondialog的字体(汉字)设置
书上的一个字体设置的例子,我写下来,结果就出现了汉字倒着放,但英文可以正常显示的情况
添加了common dialog控件后,界面如下:

代码如下:

由于图片太小,我把代码写下来:
运行设置:

运行结果:

希望大家帮我分析下,为什么汉字在通用对话框的字体显示中,是呈现-90度倒着的?
谢谢
------解决方案--------------------
代码没有问题,图片太小看不清,
你看看是不是选择了打印机字体, 就是字体名前带了一个"@"的.
你将列表一直向上滚动,看看下面还有没有你汉字字体.
书上的一个字体设置的例子,我写下来,结果就出现了汉字倒着放,但英文可以正常显示的情况
添加了common dialog控件后,界面如下:
代码如下:
由于图片太小,我把代码写下来:
Private Sub Command1_Click()
CommonDialog1.Flags = cdlCFBoth Or cdlCFEffects
CommonDialog1.ShowFont
If CommonDialog1.FontName > "" Then
Text1.FontName = CommonDialog1.FontName
End If
Text1.FontSize = CommonDialog1.FontSize
Text1.FontBold = CommonDialog1.FontBold
Text1.FontItalic = CommonDialog1.FontItalic
Text1.FontStrikethru = CommonDialog1.FontStrikethru
Text1.FontUnderline = CommonDialog1.FontUnderline
Text1.ForeColor = CommonDialog1.Color
End Sub
运行设置:
运行结果:
希望大家帮我分析下,为什么汉字在通用对话框的字体显示中,是呈现-90度倒着的?
谢谢
------解决方案--------------------
代码没有问题,图片太小看不清,
你看看是不是选择了打印机字体, 就是字体名前带了一个"@"的.
你将列表一直向上滚动,看看下面还有没有你汉字字体.