Foxtable(狐表)用户栏目专家坐堂 → ListView 文字大小 如何控制


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

主题:ListView 文字大小 如何控制

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


加好友 发短信
等级:一尾狐 帖子:457 积分:3523 威望:0 精华:0 注册:2016/1/22 18:17:00
ListView 文字大小 如何控制  发帖心情 Post By:2016/12/14 17:05:00 [只看该作者]

Dim lvw As WinForm.ListView = e.Form.Controls("ListView1")
lvw.StopRedraw() '暂停绘制
lvw.Rows.Clear() '清除原来的行
lvw.Images.Clear() '清除原来的图片
lvw.View = ViewMode.Tile '显示模式为 大图标
lvw.Images.LargeSize = New Size(200,200) '定义大图标尺寸
lvw.TitleSize = New Size(400,200)
Dim cls() As String = {"模具编号","模具名称","模号","库位","当前状态","更新日期"} '定义列名 
For i As Integer = 0 To  cls.Length - 1  '增加列 
    Dim c As WinForm.ListViewColumn = lvw.Columns.Add() 
    c.Name = cls(i) '指定列名 
Next
For Each dr As DataRow In DataTables("模具").DataRows '从数据表中提取数据 
    Dim Key As String = dr("模具图片") '获取此员工的照片文件
    lvw.Images.AddLargeImage(Key, Key) '添加照片,直接用文件名作为图片键值
    Dim vr As  WinForm.ListViewRow =  lvw.Rows.Add() '增加一行
    vr.ToolTipText = dr("当前状态")
    vr.ImageKey = Key '设置图片键值
    For Each cl As String In cls '逐列取值
        vr(cl) = dr(cl)
    Next
Next
lvw.ResumeRedraw() '恢复绘制


这里显示的 "模具编号","模具名称","模号","库位","当前状态","更新日期" 都是默认文字大小,如何加大字号,进行字符格式设置

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


加好友 发短信
等级:一尾狐 帖子:457 积分:3523 威望:0 精华:0 注册:2016/1/22 18:17:00
  发帖心情 Post By:2016/12/14 17:11:00 [只看该作者]

vr.Font = New Font("微软雅黑",8)  字体可以这样控制,行距如何调整呢

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/12/14 17:30:00 [只看该作者]

高度设置SmallSize 的高度

Dim lvw As WinForm.ListView = e.Form.Controls("ListView1")
lvw.Images.SmallSize  = New Size(1,50)

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


加好友 发短信
等级:一尾狐 帖子:457 积分:3523 威望:0 精华:0 注册:2016/1/22 18:17:00
  发帖心情 Post By:2016/12/15 11:06:00 [只看该作者]

经测试这个参数 不能控制 行距

比如我有五行文字 vr.Font = New Font("微软雅黑",15) 
则文字大小是变了,但行间距没有变,都挤在一起了

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2016/12/15 11:34:00 [只看该作者]

 你只能设置整体的字体,如

 

lvw.font = new font("宋体", 18)


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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/12/15 12:09:00 [只看该作者]

3楼的方式我测试没有问题


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


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


加好友 发短信
等级:一尾狐 帖子:457 积分:3523 威望:0 精华:0 注册:2016/1/22 18:17:00
  发帖心情 Post By:2016/12/15 12:16:00 [只看该作者]

设置整体 的字体是可以的


那么ListView1 的当前行 比如 某一个字段 值发生了改变 要在ListView1 里面更新一下本行 如何 弄,不需要全部更新

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2016/12/15 14:42:00 [只看该作者]


 回到顶部