- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]为何在窗体中点击table控件而Current未改变？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=115648)
-- 发布时间：2018/3/11 14:25:00
-- [求助]为何在窗体中点击table控件而Current未改变？
为何在窗体中点击table控件而Current未改变？是table控件为SQL原因吗？如果是，怎样把窗体中鼠标点击的行设置为Current
-- 发布时间：2018/3/11 20:12:00
--
具体一点你的问题。
如果点选了table的不同行，会触发currentChanged事件的，你没有触发？
如果点选了table，但是选择的是同一行，不会触发currentChanged事件。
获取某表的当前行，这样获取
Dim t As Table = e.Form.Controls("Table1").table
Dim r As Row = t.current
-- 发布时间：2018/3/11 21:32:00
--
具体是这样，我从菜单打开了一个添加数据窗口，在添加数据窗口通过按钮打开一个含有TABLE控件的窗口，原意是点击TABLE控件，获取到当前行，退出含有TABLE窗口后，在添加数据窗口获取当前行数据，两个窗口均未绑定表，在含有TABLE控件窗口监测有currentChanged事件发生且当前行号也正确，但关闭含有TABLE控件窗口后，在添加数据窗口得到的当前行号不正确
[此贴子已经被作者于2018/3/11 21:49:03编辑过]
-- 发布时间：2018/3/11 21:49:00
--
从你文字描述不清楚具体问题，能否做一个对应实例说明？
1、你要实现的是什么功能？
2、两个table，你要获取哪个table的什么数据？写的是什么代码？
-- 发布时间：2018/3/11 22:09:00
--
如图，永远都在第一行。
此主题相关图片如下：吞吞吐吐.png
[此贴子已经被作者于2018/3/11 22:10:06编辑过]
-- 发布时间：2018/3/11 22:18:00
--
这种问题，一般是你表名没有写对。
点击table或者关闭窗口的时候，赋值，如
Dim r As Row = e.form.controls("Table1").Table.Current
msgbox(r("单位流水"))
msgbox(r("单位简称"))
-- 发布时间：2018/3/11 22:28:00
--
表名一模一样，从图可以看出，且第三步什么也没做，就点格子而已。通过曲线救国已经解决，就是在table控件的click事件中保存当前行到全局变量，困扰一下午，诶
-- 发布时间：2018/3/11 22:31:00
--
以下是引用小美菜在2018/3/11 22:28:00的发言：
表名一模一样，从图可以看出，且第三步什么也没做，就点格子而已。通过曲线救国已经解决，就是在table控件的click事件中保存当前行到全局变量，困扰一下午，诶
表名一模一样，从图可以看出，且第三步什么也没做，就点格子而已。通过曲线救国已经解决，就是在table控件的click事件中保存当前行到全局变量，困扰一下午，诶
肯定是你表名写错。在beforeClose事件写这个代码弹出什么？弹出正确那就直接赋值给控件。
Dim r As Row = e.form.controls("Table1").Table.Current
msgbox(r("单位流水"))
msgbox(r("单位简称"))