Foxtable(狐表)用户栏目专家坐堂 → 每次打开界面主窗口自动打开


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

主题:每次打开界面主窗口自动打开

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


加好友 发短信
等级:六尾狐 帖子:1347 积分:9817 威望:0 精华:0 注册:2015/6/30 8:46:00
  发帖心情 Post By:2018/9/3 14:02:00 [显示全部帖子]

AfterOpenProject

此事件在项目已经完全打开后执行,此时DataTable、Table和窗口都已经生成。

示例一

例如希望产品表内容只能在Tables("产品")修改,也就是只能在主表修改,而不能在关联表修改,可以在AfterOpenProject事件中加入如下代码:

DataTables("产品").AllowEdit = False
Tables
("产品").AllowEdit = True

注意上面的代码不能设置在Initialize事件中,因为Initialize事件代码执行时,Table还没有生成的。

示例二

假定打开项目的用户是“经理”级别的时候,则自动打开某个窗口,可以在AfterOpenProject事件中加入代码:

If User.Group = "经理" Then
    Forms(
"窗口1").Open()
End
If


 回到顶部