Foxtable(狐表)用户栏目专家坐堂 → [求助]想设计一个通用窗口,接收不同的父窗口数据,并保持到不同的表。已解决


  共有2922人关注过本帖树形打印复制链接

主题:[求助]想设计一个通用窗口,接收不同的父窗口数据,并保持到不同的表。已解决

帅哥哟,离线,有人找我吗?
东风光魔
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:49 积分:452 威望:0 精华:0 注册:2017/11/1 10:36:00
[求助]想设计一个通用窗口,接收不同的父窗口数据,并保持到不同的表。已解决  发帖心情 Post By:2018/9/18 21:26:00 [显示全部帖子]

第一张图是笨办法,已实现。但是用了6个窗口。

想实现第二张图,想设计一个通用(共用)窗口,接收不同的父窗口数据,并保存到不同的表

看了教程和实例,还有视频课程,都没找到设计思路,请教老师指点开发思路?设计思路?要用事件?属性?

 

 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180918211205.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180918211531.png
图片点击可在新窗口打开查看
看了全局变量的章节,还是没找到设计思路。
[此贴子已经被作者于2018/9/19 12:04:29编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
东风光魔
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:49 积分:452 威望:0 精华:0 注册:2017/11/1 10:36:00
  发帖心情 Post By:2018/9/18 21:38:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180918213617.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180918213636.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
东风光魔
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:49 积分:452 威望:0 精华:0 注册:2017/11/1 10:36:00
  发帖心情 Post By: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

 回到顶部