以文本方式查看主题

-  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=142594)

--  作者:天一生水
--  发布时间:2019/10/31 21:52:00
--  [求助]ListView删除图片报错
老师好!
如图ListView控件中的图片,利用按钮”添加图片”加入的,鼠标右键删除没有问题;
但是加载PDF文件后,分解的图片放入ListView中的,右键删除就会报错。
这是什么原因,代码用的都是一样的。

鼠标右键快捷菜单代码如下:
Select Case e.StripItem.Name
    Case "删除选择图片"
        Dim lvw As WinForm.ListView = Forms("窗口").Controls("ListView1")
        For Each vr As WinForm.ListViewRow In lvw.SelectedRows
            If vr Is Nothing Then \'如果不存在当前行,也就是内有选定任何一行
                Return
            End If
            Dim dr As DataRow = vr.tag \'获取此行对应的DataRow
            dr.Delete \'从DataTable删除行
            vr.Delete \'从ListView删除行
        Next
End Select


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


 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:图片删除测试.rar


[此贴子已经被作者于2019/10/31 21:55:43编辑过]

--  作者:有点蓝
--  发布时间:2019/11/1 9:20:00
--  
既然有一个是正确的用法,自己对比一下添加图片,和PDF分解按钮的代码不就知道问题在那了。

    vr.Tag= dr \'将DataRow赋值给ListViewRow的Tag属性,将二者联系起来