Foxtable(狐表)用户栏目专家坐堂 → 动态目录树与行删除


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

主题:动态目录树与行删除

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


加好友 发短信
等级:婴狐 帖子:12 积分:152 威望:0 精华:0 注册:2016/4/19 21:33:00
动态目录树与行删除  发帖心情 Post By:2016/4/23 19:09:00 [只看该作者]

(PrepareEdit事件代码如下:)
If e.Col.name="大类"
Dim tb As new droptreebuilder
    tb.sourceTable=DataTables("进货")
    tb.treecols="大类|小类|品牌|型号|串号"
    tb.sourcecols="大类|小类|品牌|型号|串号|建议价"
    tb.receivecols="大类|小类|品牌|型号|串号|建议价"
    Tables("日报").Cols("大类").droptree=tb.build()
End If

(DataColchanged事件代码如下:)
If e.DataCol.Name = "建议价" Then 
        If e.DataRow("串号") IsNot Nothing
           Dim filter As String
           filter="[串号]='"&e.DATAROW("串号")&"'"
           DataTables("进货").deletefor(filter)
        End If
           
End If

添加以上代码后,”日报表“中进行删除行操作时无反应,需在“大类“以外列点击才能成功,为什么?如何改进?
请指教!
[此贴子已经被作者于2016/4/23 19:18:19编辑过]

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/4/24 11:12:00 [只看该作者]

上例子测试

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/24 12:49:00 [只看该作者]

 不理解你的意思,请上传实例。

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


加好友 发短信
等级:婴狐 帖子:12 积分:152 威望:0 精华:0 注册:2016/4/19 21:33:00
  发帖心情 Post By:2016/4/24 14:03:00 [只看该作者]

在”日报“表中,直接点击行号删除该行时系统无反应,但在非“大类”列再点击一下就成功了。似乎形成死循环,连点“保存”按钮也没反应。代码哪里出错了?

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


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/24 15:11:00 [只看该作者]

代码没问题的,测试没问题。

 

你把bin文件夹删除,重新打开测试。


 回到顶部