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


  共有4683人关注过本帖树形打印复制链接

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

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


加好友 发短信
等级:八尾狐 帖子:1964 积分:15604 威望:0 精华:0 注册:2011/7/16 20:59:00
[求助]发布后的项目如何保持住Label1控件的字体?  发帖心情 Post By:2015/11/11 10:42:00 [只看该作者]

控件Label1设置了字体格式。可是发布之后就改变了。怎么在发布后能保持到初始设置的字体呢?谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/11/11 11:15:00 [只看该作者]

呃,应该是保持你的设置的啊。新项目的话,发布是否有问题?

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


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


图片点击可在新窗口打开查看此主题相关图片如下:aaa.jpg
图片点击可在新窗口打开查看

设置了这样字体之后,在本机运行源码程序和发布后的程序都能显示这样字体。可是发布程序在别的机器上运行时,这个字体就发生变化了,就全部变成宋体了!
[此贴子已经被作者于2015/11/12 5:42:42编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
逛逛
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:1693 积分:12135 威望:0 精华:7 注册:2013/7/11 10:52:00
  发帖心情 Post By:2015/11/12 8:19:00 [只看该作者]

别的电脑没有你设置的字体


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


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

怎么解决呢?

 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2015/11/12 8:35:00 [只看该作者]

要想保持其他电脑中可能没有的原字体,可将文本截图,用图片显示。

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


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

这样也会随每台机器分辨率的不同 拉长或缩小啊!

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


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

应该在发布时是不是可以把字体也带过去呢?

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/11/12 9:26:00 [只看该作者]

以下是引用新福星在2015/11/12 8:38:00的发言:
应该在发布时是不是可以把字体也带过去呢?

 

简单做法,你可以在BeforeOpenPorject把字体拷贝到此目录下c:\windows\fonts

 

dim fontdir as string = System.Environment.GetEnvironmentVariable("windir") + "/fonts/"
msgbox(fontdir)


 回到顶部
帅哥哟,离线,有人找我吗?
Hyphen
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2015/11/12 9:29:00 [只看该作者]

使用系统中不存在的字体的方法,发布的时候把字体文件包含进项目目录中,字体路径使用项目路径获取

 

Dim privateFonts As new System.Drawing.Text.PrivateFontCollection()
privateFonts.AddFontFile("F:\VS\字体\DejaVuSansMono.ttf")
Dim font As System.Drawing.Font
font = new System.Drawing.Font(privateFonts.Families(0), 12)
e.Form.Controls("TextBox1").Font = font


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