Foxtable(狐表)用户栏目专家坐堂 → 窗口table动态绑定关联表


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

主题:窗口table动态绑定关联表

帅哥哟,离线,有人找我吗?
大红袍
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/2/21 11:11:00 [只看该作者]

 不能用代码绑定关联表的,只能绑定主表。

 

 而且,关联表只有一个。要不你做一个窗口,绑定好关联表,然后打开此窗口,剪切这个控件过来。

 

 否则,你就只能模拟关联  http://www.foxtable.com/help/topics/2222.htm

 


 回到顶部
美女呀,离线,留言给我吧!
cyl123
  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:758 积分:6382 威望:0 精华:0 注册:2014/12/21 21:01:00
  发帖心情 Post By:2016/2/22 10:43:00 [只看该作者]

有没有办法,窗口表绑定好关联表,打开窗口后再动态加载表,动态新建关联表


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/2/22 12:07:00 [只看该作者]

 不可以新建关联表,只能剪切某个关联表过来,关联表只有一个。

 

 如果你需要多个,就必须用【模拟关联】


 回到顶部
美女呀,离线,留言给我吧!
cyl123
  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:758 积分:6382 威望:0 精华:0 注册:2014/12/21 21:01:00
  发帖心情 Post By:2016/2/22 12:53:00 [只看该作者]

能将原系统的关联表直接剪切过来吗

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/2/22 12:58:00 [只看该作者]

以下是引用cyl123在2016/2/22 12:53:00的发言:
能将原系统的关联表直接剪切过来吗

 

 

forms("窗口1").Open
e.Form.AddControl(forms("窗口1").Controls("Table1"))
forms("窗口1").Close


 回到顶部
美女呀,离线,留言给我吧!
cyl123
  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:758 积分:6382 威望:0 精华:0 注册:2014/12/21 21:01:00
  发帖心情 Post By:2016/2/22 13:02:00 [只看该作者]

好像动态生成表控件,可以直接绑定关联表呀

Dim tbl As WinForm.Table
tbl = fn.CreateTable(“表A.表B”, "表A.表B”,False)

tbl.SetBounds(10, 10, 600, 400)
e.Form.AddControl(tbl)


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/2/22 14:23:00 [只看该作者]

 嗯嗯,是可以,但不是新建,关联只有一个。

 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  18楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57584 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2016/2/22 14:39:00 [只看该作者]

Dim tbl As WinForm.Table
tbl = e.Form.CreateTable(
"Table1""订单"False)
tbl.SetBounds(
1010600400
)
e.Form.AddControl(tbl)

 回到顶部
帅哥哟,离线,有人找我吗?
凡夫俗子
  19楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:457 积分:3523 威望:0 精华:0 注册:2016/1/22 18:17:00
  发帖心情 Post By:2016/4/15 21:31:00 [只看该作者]

 

forms("窗口1").Open
e.Form.AddControl(forms("窗口1").Controls("Table1"))
forms("窗口1").Close


这个测试 是可以的


那其它控件 能不能按此方式搞过来


比如

e.Form.AddControl(Forms("顶部窗口").Controls("BtnFOXLEFT"))


怎么执行不了


 回到顶部
帅哥哟,离线,有人找我吗?
Hyphen
  20楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/4/16 9:43:00 [只看该作者]

指定控件的位置,否则按原来的位置放
Dim btn = Forms("顶部窗口").Controls("BtnFOXLEFT")
btn.Top = 10
btn.left = 10
e.Form.AddControl(btn )

 回到顶部
总数 20 上一页 1 2