Foxtable(狐表)用户栏目专家坐堂 → [求助] 求救! 多层关联表窗口位置保存


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

主题:[求助] 求救! 多层关联表窗口位置保存

帅哥哟,离线,有人找我吗?
狐狸爸爸
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/8/25 15:38:00 [显示全部帖子]

将关联表的自动打开属性设置为False.

改为在AfterOpenProject事件中用代码打开关联表,通过打开关联表的顺序,来控制其位置。


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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/8/26 15:37:00 [显示全部帖子]

应该设置在MainTableChamged事件,代码:

 

If  MainTable.Name = "订单管理" Then
    ' Forms("订单管理.订单子项").Show()
    '....

End If


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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/8/26 15:43:00 [显示全部帖子]

If MainTable.Name = "订单管理" Then
    Tables("订单管理.订单子项").Show()
   ....

End If


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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/8/26 15:58:00 [显示全部帖子]

窗口是窗口,关联表示关联表,两者概念完全不同

前者是WinForm.Form,后者是Table。

 

应该是:

 

For each t As Table in Tables

    if t.Name.StartsWith("订单管理.") Then

         T.Visble = True

    End if

next

 

或者:

 

If MainTable.Name = "订单管理" Then
     Tables("订单管理.订单子项").Visible= True
     Tables("订单管理.订单子项.工种进度").Visible = True

     Tables("订单管理.订单子项.工种进度.工料用量").Visible = True
End If

[此贴子已经被作者于2011-8-26 16:00:29编辑过]

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/8/26 16:03:00 [显示全部帖子]


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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/8/26 16:07:00 [显示全部帖子]

我笔误,是Visible

 


 回到顶部