以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- ListView 复选框同步 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=56833) |
-- 作者:yifan3429 -- 发布时间:2014/9/13 10:22:00 -- ListView 复选框同步 怎样将ListView 复选框属性 同步到表A 的逻辑列 Forms("稍后窗").Show() Dim lvw As WinForm.ListView = e.Form.Controls("ListView1") lvw.CheckBoxes = True lvw.StopRedraw() \'暂停绘制 lvw.Rows.Clear() \'清除原来的行 lvw.Images.Clear() \'清除原来的图片 lvw.View = ViewMode.LargeIcon \'显示模式为大图标 lvw.Images.LargeSize = New Size(180,120) \'定义大图标尺寸 For Each dr As Row In Tables("产品数据库").Rows \'从数据表中提取数据 Dim Key As String = dr("产品效果图") \'获取此员工的照片文件 lvw.Images.AddLargeImage(Key, "\\\\192.168.18.165\\客户管理$\\产品库\\" & Key) \'添加照片,直接用文件名作为图片键值 Dim vr As WinForm.ListViewRow = lvw.Rows.Add() \'增加一行 vr.Text = dr("产品编号") & dr("产品名称") \'设置标题 vr.ImageKey = Key \'设置图片键值 Next lvw.ResumeRedraw() \'恢复绘制 Forms("稍后窗").Close() |
-- 作者:Bin -- 发布时间:2014/9/13 10:42:00 -- 在RowChecked 事件中 获取对应的行,设置逻辑列的值即可. |
-- 作者:yifan3429 -- 发布时间:2014/9/13 11:28:00 -- 搞了半天还是不行 没文化真可悲啊! 该怎样才是正确的呢 还是要请教老师 同步代码 [此贴子已经被作者于2014-9-13 11:43:43编辑过]
|
-- 作者:yifan3429 -- 发布时间:2014/9/13 11:52:00 -- 自己顶下 [此贴子已经被作者于2014-9-13 12:01:53编辑过]
|
-- 作者:Bin -- 发布时间:2014/9/13 14:07:00 -- 生产LISTVIEW的时候把行的TAG 赋值为对应的Datarow 然后直接 e.row.tag 就能获取这个对应的行了.
|
-- 作者:Bin -- 发布时间:2014/9/13 14:08:00 -- http://www.foxtable.com/help/topics/2782.htm |
-- 作者:yifan3429 -- 发布时间:2014/9/13 14:41:00 -- 写在 RowChecked 下吗 还是在这里面修改 Forms("稍后窗").Show() Dim lvw As WinForm.ListView = e.Form.Controls("ListView1") lvw.CheckBoxes = True lvw.StopRedraw() \'暂停绘制 lvw.Rows.Clear() \'清除原来的行 lvw.Images.Clear() \'清除原来的图片 lvw.View = ViewMode.LargeIcon \'显示模式为大图标 lvw.Images.LargeSize = New Size(180,120) \'定义大图标尺寸 For Each dr As Row In Tables("产品数据库").Rows \'从数据表中提取数据 Dim Key As String = dr("产品效果图") \'获取此员工的照片文件 lvw.Images.AddLargeImage(Key, "\\\\192.168.18.165\\客户管理$\\产品库\\" & Key) \'添加照片,直接用文件名作为图片键值 Dim vr As WinForm.ListViewRow = lvw.Rows.Add() \'增加一行 vr.Text = dr("产品编号") & dr("产品名称") \'设置标题 vr.ImageKey = Key \'设置图片键值 Next lvw.ResumeRedraw() \'恢复绘制 Forms("稍后窗").Close() 我还是看不懂 晕了 没有对应的行的实例 不知道怎么改 |
-- 作者:Bin -- 发布时间:2014/9/13 14:47:00 -- 看6楼实例 |
-- 作者:yifan3429 -- 发布时间:2014/9/13 14:56:00 -- 错误 此主题相关图片如下:qq截图20140913145506.png |
-- 作者:Bin -- 发布时间:2014/9/13 15:25:00 -- e.row 要在RowChecked 事件才有.你要在这个事件才去获取它用于同步 |