- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]关于窗口中table查询结果问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=81733)
-- 发布时间：2016/3/4 15:24:00
-- [求助]关于窗口中table查询结果问题
在窗体中插入table控件，在打开窗体会列出表table绑定表的数据；
在输入查询条件之后会列出满足条件的列，但双击之后数据确实查询之前；
此主题相关图片如下：飞信截图20160304151628.png
此主题相关图片如下：2.png
在textbox Textchanged查询代码为：
Dim tx As String = e.sender.text
Tables("客户信息管理_Table1").Filter = "[客户名称] Like \'*" & tx & "*\' or [业务负责人] like \'*" & tx & "*\'"
表positionchanged 代码：
If e.Table.Rows.Count>0 Then
If Forms("新增客户信息").opened Then
Tables("B_Client").Position= Tables("B_Client").Rows.count-1
Else
Dim dr As DataRow
dr = DataTables("B_Client").Find("[客户编号] = \'" & e.Table.current("客户编号") & "\'")
If dr IsNot Nothing Then
Dim wz As Integer = Tables("B_Client").FindRow(dr)
If wz >= 0 Then
Tables("B_Client").Position = wz
End If
End If
End If
表doubleclick 代码Forms("客户信息修改").Open
但是在查询结果上双击弹出的窗体带出的数据不是所选择的数据而是之前表数据，
请问应该如何处理；
请问应该如何处理；
[此贴子已经被作者于2016/3/4 15:25:15编辑过]
-- 发布时间：2016/3/4 15:26:00
--
你这个录入窗口的控件，应该绑定表 客户信息管理_Table1
[此贴子已经被作者于2016/3/4 15:25:45编辑过]
-- 发布时间：2016/3/4 15:26:00
--
或者是，做一下同步
http://www.foxtable.com/help/topics/2631.htm
-- 发布时间：2016/3/4 19:12:00
--
在Table中curretchange设置如下：
Dim dr As DataRow = e.Table.Current.DataRow
Dim wz As Integer = Tables("B_Client").FindRow(dr)
If wz >=0 Then
Tables("B_Client").Position = wz
End If
还是发生以下的错误，Table是作为B_Client的附表来的
.NET Framework 版本：2.0.50727.5472
Foxtable 版本：2015.12.22.1
错误所在事件：B_Client,CurrentChanged
详细错误信息：
未将对象引用设置到对象的实例。
[此贴子已经被作者于2016/3/4 19:12:41编辑过]
-- 发布时间：2016/3/5 9:37:00
--
Dim dr As Row = e.Table.Current
If dr IsNot Nothing Then
Dim wz As Integer = Tables("B_Client").FindRow(dr.DataRow)
If wz >=0 Then
Tables("B_Client").Position = wz
End If
End If