以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  双击副本表行号单元格  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=143596)

--  作者:蓝蚂蚁
--  发布时间:2019/11/29 8:01:00
--  双击副本表行号单元格
窗口1的table1绑定A表,并且是副本表,其中table1的CurrentChanged代码:
Dim dr As DataRow = e.Table.Current.DataRow
Dim wz As Integer = Tables("目录").FindRow(dr)
If wz >=0 Then
      Tables("目录").Position = wz
End If
在A表的DoubleClickRowHeader里有代码:Forms("双击文本显示信息窗口").open。其中窗口“双击文本显示信息窗口”的AfterLoad代码如下:
If  CurrentTable.name="目录" Or CurrentTable.name="窗口1_Table1" Then
    Dim r As Row = Tables("目录").current
    Dim s As String=""
    Dim a1 As String="中标号或编号"
    Dim a2 As String="组件名称"
    Dim a3 As String="规格型号"
    Dim a4 As String="生产企业"
    Dim a5 As String="单位"
    Dim a6 As String="中标价"
    Dim a7 As String="采购价"
    Dim str As String = ""
    str=a1 & ":" & r(a1)  & vbcrlf & a2 & ":" & r(a2)  & vbcrlf & a3 & ":" &  r(a3)  & vbcrlf & a4 & ":" & r(a4)  & vbcrlf & a5 & ":" & r(a5)  & vbcrlf & a6 & ":" & Format(r(a6),"0.0000") & "元/" & r(a5) & vbcrlf & a7 & ":" & Format(r(a7),"0.0000")  & "元/" & r(a5) & vbcrlf
    e.Form.Controls("TextBox1").text=str
End If
问题:为什么在目录这个主表中双击行头就能够弹出“双击文本显示信息窗口”,双击副本表的行头就不会弹出“双击文本显示信息窗口”?

--  作者:有点蓝
--  发布时间:2019/11/29 8:20:00
--  
if e.Table.Current is nothing then return
Dim dr As DataRow = e.Table.Current.DataRow
Dim wz As Integer = Tables("目录").FindRow(dr)
If wz >=0 Then
      Tables("目录").Position = wz
End If
在A表的DoubleClickRowHeader里有代码:Forms("双击文本显示信息窗口").open。其中窗口“双击文本显示信息窗口”的AfterLoad代码如下:
If  (CurrentTable.name="目录" Or CurrentTable.name="窗口1_Table1") andalso CurrentTable.current isnot nothing Then
    Dim r As Row = CurrentTable.current
    Dim s As String=""
    Dim a1 As String="中标号或编号"
……

--  作者:蓝蚂蚁
--  发布时间:2019/11/29 8:27:00
--  
不行的 ,在窗口1_Table1双击行头还是没有弹出“双击文本显示信息窗口”的窗口
--  作者:有点蓝
--  发布时间:2019/11/29 9:37:00
--  
我测试没有问题,上传实例说明
--  作者:蓝蚂蚁
--  发布时间:2019/11/29 10:32:00
--  
我用其他窗口绑定的副本表就行,唯独窗口1绑定的副本表就不行,看看老师能指点一下,像这样的情况如何排查,因为项目比较大不方便上传
--  作者:蓝蚂蚁
--  发布时间:2019/11/29 10:42:00
--  
再经过测试,在窗口1中再增加一个副本表,也是绑定目录表,然后双击行头,发现能正常弹出弹出,不知道为什么双击Table1就不行
--  作者:蓝蚂蚁
--  发布时间:2019/11/29 11:20:00
--  
我简单的做了实例
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.zip


--  作者:有点蓝
--  发布时间:2019/11/29 11:21:00
--  
那就删除,重新添加一个副本表
--  作者:蓝蚂蚁
--  发布时间:2019/11/29 11:25:00
--  
以下是引用有点蓝在2019/11/29 11:21:00的发言:
那就删除,重新添加一个副本表   
老师还是麻烦你帮看看实例


--  作者:有点蓝
--  发布时间:2019/11/29 11:54:00
--  
嗯,窗口表有自己的事件后,主表这个事件被屏蔽了。这个问题已经反馈