以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  平铺模式的字体  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=185730)

--  作者:fendouww
--  发布时间:2023/3/13 15:15:00
--  平铺模式的字体
ListView的显示模式为平铺,我设置了字体大小,但行距并不会自动变大,有办法吗?

    Dim vr As WinForm.ListViewRow = lvw.Rows.Add() \'增加一行
    vr.ToolTipText = dr("备注") \'设置此行的动态提示
    vr.ImageKey = Key \'设置图片键值
    vr.Font = New Font("宋体", 12, FontStyle.Regular)
    vr.ForeColor =  Color.Black
图片点击可在新窗口打开查看此主题相关图片如下:snipaste_2023-03-13_15-12-43.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2023/3/13 15:40:00
--  
试了一下,没有办法
--  作者:fendouww
--  发布时间:2023/3/16 10:54:00
--  
那老师我能更新已绘制的行吗?比如行的信息有更改,我只想更新这一行,可以做到吗?平铺模式下
--  作者:有点蓝
--  发布时间:2023/3/16 11:00:00
--  
比如直接更改选中行的内容

Dim lvw As WinForm.ListView = e.Form.Controls("ListView1")

If lvw.Current IsNot Nothing Then

    Dim vr As WinForm.ListViewRow = lvw.Current

    vr("面积") = "xxxx"

End If


--  作者:fendouww
--  发布时间:2023/3/16 16:24:00
--  
还有个问题,平铺模式下的  vr.ToolTipText = dr("备注") \'设置此行的动态提示  是无效的吗?有办法显示么?
--  作者:有点蓝
--  发布时间:2023/3/16 16:32:00
--  
帮助的示例我测试没有问题:http://www.foxtable.com/webhelp/topics/2776.htm