Foxtable(狐表)用户栏目专家坐堂 → [求助]发布后的项目如何保持住Label1控件的字体?


  共有4585人关注过本帖平板打印复制链接

主题:[求助]发布后的项目如何保持住Label1控件的字体?

帅哥哟,离线,有人找我吗?
新福星
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1960 积分:15566 威望:0 精华:0 注册:2011/7/16 20:59:00
  发帖心情 Post By:2015/11/12 17:18:00 [只看该作者]

谢谢!按照老师的提示,在该窗口的AfterLoad事件中,程序如下:
Dim t1 As WinForm.Label = e.Form.Controls("Label1")
Dim privateFonts As new System.Drawing.Text.PrivateFontCollection()
'MessageBox.Show(ProjectPath  & "ygyxsziti2.0.ttf")
privateFonts.AddFontFile( ProjectPath  & "ygyxsziti2.0.ttf")
Dim font As System.Drawing.Font
font = new System.Drawing.Font(privateFonts.Families(0), 21.2)
t1.Font = font

第一次运行肯定出一次错误,在t1控件出现一个大X,再运行就正常了!怎么解决?谢谢

 回到顶部
总数 26 1 2 3 下一页