Foxtable(狐表)用户栏目专家坐堂 → [请教] 文件管理器字体


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

主题:[请教] 文件管理器字体

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


加好友 发短信
等级:六尾狐 帖子:1425 积分:11332 威望:0 精华:0 注册:2008/9/1 22:20:00
[请教] 文件管理器字体  发帖心情 Post By:2014/8/28 17:30:00 [只看该作者]

字体无法设置,感觉和整个界面不协调,很别扭。
[此贴子已经被作者于2014-8-29 14:55:04编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/28 17:37:00 [只看该作者]

 这个是可以设置的,参考

 

e.Form.Controls("FileManager1").Font = New Font("宋体",12,FontStyle.Bold Or FontStyle.Underline)


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


加好友 发短信
等级:六尾狐 帖子:1425 积分:11332 威望:0 精华:0 注册:2008/9/1 22:20:00
  发帖心情 Post By:2014/8/28 17:47:00 [只看该作者]

明白了,谢谢。

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


加好友 发短信
等级:六尾狐 帖子:1425 积分:11332 威望:0 精华:0 注册:2008/9/1 22:20:00
  发帖心情 Post By:2014/8/29 14:31:00 [只看该作者]

设置字体后发现问题:文件管理器偏离了设计时的位置,跑偏了。
窗体afterload代码如下:
Dim fm As WinForm.FileManager = e.Form.Controls("FileManager1")
fm.Font = New Font("宋体",12)

禁止上述代码后,就正常了。
(控件位置均为默认)
设计时:

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

预览时:

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


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


加好友 发短信
等级:六尾狐 帖子:1425 积分:11332 威望:0 精华:0 注册:2008/9/1 22:20:00
  发帖心情 Post By:2014/8/29 14:55:00 [只看该作者]


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/29 14:59:00 [只看该作者]

 呃,位置问题,我测试,一点问题都没有。

 

 例子发上来。


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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2014/8/29 15:05:00 [只看该作者]

可能和操作系统有关,我这边定位也有问题,要不你把代码改为这样测试一下:

 

Dim fm As WinForm.FileManager = e.Form.Controls("FileManager1")
For Each c1 As Windows.Forms.Control In fm.BaseControl.Controls
    c1.Font = New Font("宋体",12)
Next
fm.AddCommand.Font = New Font("宋体",12)
fm.AddFolderCommand.font = New Font("宋体",12)

...设置其他命令的字体

[此贴子已经被作者于2014-8-29 15:06:03编辑过]

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


加好友 发短信
等级:六尾狐 帖子:1425 积分:11332 威望:0 精华:0 注册:2008/9/1 22:20:00
  发帖心情 Post By:2014/8/29 15:16:00 [只看该作者]

谢谢狐爸

 回到顶部