Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共2 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:折叠模式下增加子行相关代码造成系统出错

1楼
wangyu7890 发表于:2024/3/13 17:53:00
需要实现的目标是:折叠模式下,增加1个新子行,如果所在的父行是末级子行,则不允许增加下级子行
BeforeAddDataRow内代码:

Dim cr As Row = Tables("flbm").Current '定义cr 并获得当前行
If cr IsNot Nothing AndAlso Tables("flbm").GridTreeVisible Then '如果当前处于折叠模式
    If cr("isend") = True Then '如果父行的末级标志为真,取消新增子行
        MessageBox.show(cr("flbmID"))  ‘输出调试信息,父行有字段数据
        e.Cancel = True       ‘取消新增行
        MessageBox.show("父行为末级,无法新增子行!")
    End If 
End If

上述代码执行后,出现错误:
.NET Framework 版本:4.0.30319.17929
Foxtable 版本:2图片点击可在新窗口打开查看022.8.18.1
错误所在事件:菜单,AddRow,Click
详细错误信息:
Object reference not set to an instance of an object.


请问如何解决?
2楼
有点蓝 发表于:2024/3/14 9:02:00
bug,已反馈。

这个暂时没有其它替代的方法,要么不要在折叠的时候到BeforeAddDataRow使用e.Cancel = True ;要么不要在折叠模式下新增
共2 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03125 s, 2 queries.