以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  共用窗口  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=190899)
--  作者：g1j2h3
--  发布时间：2024/3/12 20:59:00
--  共用窗口

有一个窗口_Table，被两个表使用。当A表打开时，打开窗口，点击窗口_Table选中的行，加载到A表中，如果B表打开时，打开窗口，点击窗口_Table选中的行，加载到B表中。怎么实现？
--  作者：有点蓝
--  发布时间：2024/3/12 21:35:00
--  
【当A表打开时】怎么样算是打开？

【点击窗口_Table选中的行】窗口_Table绑定的是什么表？

【加载到A表中】加载什么数据到A表？
--  作者：g1j2h3
--  发布时间：2024/3/12 22:11:00
--  
窗口_table绑定的是产品表，当界面显示出库表的表中内容时，点击选中窗口_table中产品表的内容，比如产品名称，规格型号及单位等某一行数据，，会自动填入到出库表中，当界面显示是预出库表中的内容时，同上内容填入到预出库表中
[此贴子已经被作者于2024/3/12 22:13:34编辑过]
--  作者：有点蓝
--  发布时间：2024/3/12 22:22:00
--  
窗口_Table的currentchanged事件

dim r as row = maintable.current
if r isnot nothing andalso e.table.current isnot nothing then
r("产品名称") = e.table.current("产品名称")
r("规格型号") = e.table.current("规格型号")
end if
--  作者：g1j2h3
--  发布时间：2024/3/13 6:16:00
--  
可能是我描述的不清楚，但您的回答给了我很大的启发，谢谢