- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]想设计一个通用窗口，接收不同的父窗口数据，并保持到不同的表。已解决 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=125050)
-- 发布时间：2018/9/18 21:26:00
-- [求助]想设计一个通用窗口，接收不同的父窗口数据，并保持到不同的表。已解决
第一张图是笨办法，已实现。但是用了6个窗口。
想实现第二张图，想设计一个通用（共用）窗口，接收不同的父窗口数据，并保存到不同的表。
看了教程和实例，还有视频课程，都没找到设计思路，请教老师指点开发思路？设计思路？要用事件？属性？
此主题相关图片如下：qq截图20180918211205.png
此主题相关图片如下：qq截图20180918211531.png
看了全局变量的章节，还是没找到设计思路。
[此贴子已经被作者于2018/9/19 12:04:29编辑过]
-- 发布时间：2018/9/18 21:38:00
--
此主题相关图片如下：qq截图20180918213617.png
此主题相关图片如下：qq截图20180918213636.png
-- 发布时间：2018/9/18 21:47:00
--
方式1、打开窗口前使用全局变量传值
某1打开窗口
vars("值") = "1"
vars("表") = "表A"
forms("备注窗口").open
备注窗口afterload
e.from.controls("textbox1").text = vars("值")
保存按钮
tables(vars("表")).current("某列") = e.from.controls("textbox1").text
2、动态绑定某表某列，直接编辑http://www.foxtable.com/webhelp/scr/1860.htm
-- 发布时间：2018/9/19 12:04:00
--
谢谢老师指点。我要传递的值是备注文本的内容，在弹出的共用通用备注窗口里。
我的实现过程如下：只要定义一个全局变量就行了。存表名，传递表名
1、 父窗口里定义vars("表") = "表A"
forms("通用备注窗口").open
2、备注窗口afterload
e.from.controls("textbox1").text = vars("值")
e.Form.Controls("通用窗口文本框").Text = Tables(Vars("表")).Current.DataRow("备注字段")
保存按钮
tables(vars("表")).current("某列") = e.from.controls("textbox1").text
Dim bzk As WinForm.TextBox = e.Form.Controls("通用窗口文本框")
Tables(Vars("表")).Current.DataRow("备注字段") = bzk.Value
Tables(Vars("表")).save()
Forms("通用备注窗口").Close