Foxtable(狐表)用户栏目专家坐堂 → 一个重大BUG


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

主题:一个重大BUG

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


加好友 发短信
等级:狐精 帖子:3370 积分:24858 威望:0 精华:0 注册:2012/3/26 21:47:00
一个重大BUG  发帖心情 Post By:2019/8/2 21:01:00 [显示全部帖子]

之前版本一直使用良好 。用83版本发布的程序出现一个问题:下拉窗口 只能在第一次打开时能返回值,再新增一行 点击没有任何反应。

dropform的doubleclick代码如下

Dim tbl As Table
tbl=e.Form.Controls("Table1").Table
If tbl.Current IsNot Nothing   Then
messagebox.show("1")
    e.Form.DropDownBox.Value = tbl.Current("物料编号")
End If
e.Form.DropDownBox.CloseDropDown()

1每次都能弹出来,但是在引用的表里只能第一次把物料编号带过来了 后面再新增的行通过这个下拉窗口无法引用。

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


加好友 发短信
等级:狐精 帖子:3370 积分:24858 威望:0 精华:0 注册:2012/3/26 21:47:00
  发帖心情 Post By:2019/8/3 15:07:00 [显示全部帖子]

方便远程吗 我单独做例子无法重现 但是在我的项目里就会出现 

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


加好友 发短信
等级:狐精 帖子:3370 积分:24858 威望:0 精华:0 注册:2012/3/26 21:47:00
  发帖心情 Post By:2019/8/3 15:19:00 [显示全部帖子]

我找到了之前的版本发布的程序  使用正常 新版本发布的就会这样

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


加好友 发短信
等级:狐精 帖子:3370 积分:24858 威望:0 精华:0 注册:2012/3/26 21:47:00
  发帖心情 Post By:2019/8/3 15:41:00 [显示全部帖子]


我改成
Dim tbl As Table
tbl=e.Form.Controls("Table1").Table
If tbl.Current IsNot Nothing   Then
messagebox.show("1")
    e.Form.DropDownBox.Value = tbl.Current("物料编号")
e.row(e.col.name)=tbl.Current("物料编号")
End If
e.Form.DropDownBox.CloseDropDown()
也没卵用  绝对是BUG  这个项目都用了几年了 找了个其他项目 用新版本发布以后也是这样 赶快找原因吧  这下搞大大发了 所有的表单只能新增一行 

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


加好友 发短信
等级:狐精 帖子:3370 积分:24858 威望:0 精华:0 注册:2012/3/26 21:47:00
  发帖心情 Post By:2019/8/3 18:02:00 [显示全部帖子]

试过了 不行 现在暂时用comlist代替一下

 回到顶部