Foxtable(狐表)用户栏目专家坐堂 → MainTable一词不能放在窗口AfterLoad中吗?


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

主题:MainTable一词不能放在窗口AfterLoad中吗?

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


加好友 发短信
等级:七尾狐 帖子:1695 积分:10725 威望:0 精华:0 注册:2009/10/25 16:45:00
MainTable一词不能放在窗口AfterLoad中吗?  发帖心情 Post By:2013/3/23 19:38:00 [只看该作者]

Dim cl As String
For Each c As col In MainTable.cols
   ' cl = cl & c.name & "|"
Next

上面代码放在afterload中,启动项目时就报错,如何避免?
注意:窗口是设置为自动打开时

[此贴子已经被作者于2013-3-26 12:38:28编辑过]

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


加好友 发短信
等级:五尾狐 帖子:1088 积分:8247 威望:0 精华:4 注册:2012/3/31 18:08:00
  发帖心情 Post By:2013/3/23 20:03:00 [只看该作者]

这个一般是放在表切换事件中用吧。没有这么用的吧。aftterload一般是加载当前窗口的数据,或者控件设置控件的一些属性用吧。。


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


加好友 发短信
等级:七尾狐 帖子:1695 积分:10725 威望:0 精华:0 注册:2009/10/25 16:45:00
  发帖心情 Post By:2013/3/24 0:56:00 [只看该作者]

窗口可以opento了, 窗口中要显示主表(maintable)的列名才有这样的代码... 那有什么好办法吗?

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


加好友 发短信 一级勋章
等级:超级版主 帖子:7258 积分:40773 威望:0 精华:16 注册:2008/8/31 23:23:00
  发帖心情 Post By:2013/3/24 1:18:00 [只看该作者]

tables("主表")

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


加好友 发短信
等级:七尾狐 帖子:1695 积分:10725 威望:0 精华:0 注册:2009/10/25 16:45:00
  发帖心情 Post By:2013/3/24 1:56:00 [只看该作者]

要任意的一个表...


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


加好友 发短信 一级勋章
等级:超级版主 帖子:7258 积分:40773 威望:0 精华:16 注册:2008/8/31 23:23:00
  发帖心情 Post By:2013/3/24 2:10:00 [只看该作者]

您都opento了,就应该知道表名了吧。

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


加好友 发短信 一级勋章
等级:超级版主 帖子:7258 积分:40773 威望:0 精华:16 注册:2008/8/31 23:23:00
  发帖心情 Post By:2013/3/24 2:15:00 [只看该作者]

办法是有的:

 

MainTableChanged事件,切换表后将主表名称写入到全局变量:暂定为:Vars("主表名");

窗口的AfterLoad事件代码为:tables(Vars("主表名"))


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


加好友 发短信
等级:七尾狐 帖子:1695 积分:10725 威望:0 精华:0 注册:2009/10/25 16:45:00
  发帖心情 Post By:2013/3/25 14:16:00 [只看该作者]

我是用 Try 忽略掉的。。。。

Try

   Dim cl As String
   For Each c As col In MainTable.cols
       cl = cl & c.name & "|"
   Next
Catch ex As Exception


    For Each c As col In Tables("订单").cols  

        cl = cl & c.name & "|"
    Next
End Try


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


加好友 发短信
等级:七尾狐 帖子:1695 积分:10725 威望:0 精华:0 注册:2009/10/25 16:45:00
  发帖心情 Post By:2013/3/26 11:42:00 [只看该作者]

程版,你7楼的方法不行。

关键是窗口不能设置成自动打开,否则都会报错。

在afteropenprojiect打开窗口又要指定窗口名称(不希望这样)。

只能用我8楼的办法了, 狐爸看看有没有其他方法。。。


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


加好友 发短信
等级:等待验证 帖子:3855 积分:20692 威望:0 精华:5 注册:2012/6/21 14:03:00
  发帖心情 Post By:2013/3/26 12:04:00 [只看该作者]

用户已被锁定

 回到顶部
总数 22 1 2 3 下一页