以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  跨表连动  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=75156)

--  作者:kaituozhe
--  发布时间:2015/9/28 22:04:00
--  跨表连动
有计划与实际两个表,设计一个窗口,在窗口设置了两table,分别绑定计划表与实际表,希望点一个表中某一产品行时,另一表中的也显示相同产品行并显示设定的颜色,便于分析比较。窗口中的两文本框,一个显示计划数,另一个框能够显示同一种产品的实际数,或一个显示实际数,另一框中显示计划数
--  作者:kaituozhe
--  发布时间:2015/9/28 22:05:00
--  
以上想法能否实现,怎么样设计。
--  作者:大红袍
--  发布时间:2015/9/28 22:07:00
--  

 就是联动而已,参考

 

http://www.foxtable.com/help/topics/2631.htm

 


--  作者:kaituozhe
--  发布时间:2015/9/28 22:14:00
--  
情况不一样,例子中是一个表的正副本,我说的是两个不同的表且都绑定窗口,在窗口中实现窗口中的两个表联动
--  作者:大红袍
--  发布时间:2015/9/28 22:15:00
--  
一样编写currentChanged事件就行啊。
--  作者:kaituozhe
--  发布时间:2015/9/28 22:18:00
--  

Table1的CurrentChanged

Dim dr As DataRow = e.Table.Current.DataRow
Dim wz As Integer = Tables("窗口1_Table2").FindRow(dr)
If wz >=0 Then
Tables(
"窗口1_Table2").Position = wz
End If


 

Table2的CurrentChanged

Dim dr As DataRow = e.Table.Current.DataRow
Dim wz As Integer = Tables("窗口1_Table1").FindRow(dr)
If wz >=0 Then
Tables(
"窗口1_Table1").Position = wz
End If

这样可以实现上述功能吗


--  作者:大红袍
--  发布时间:2015/9/28 22:19:00
--  
只要表写对,就没问题。
--  作者:kaituozhe
--  发布时间:2015/9/28 22:31:00
--  

我的希望是在table1中点甲产品,在table2中光标也能够放在甲产品的位置上,相反也能做到,我在窗口中这样设了,但是还不行,是否还需要添加条件


--  作者:大红袍
--  发布时间:2015/9/28 22:32:00
--  
你表名肯定写错了,如果不是副本表,直接写主表的名字。
--  作者:kaituozhe
--  发布时间:2015/9/28 22:40:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理会计.table