以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 如何禁止窗口位置的移动 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=4006) |
-- 作者:chenwuwenyu -- 发布时间:2009/8/23 11:32:00 -- 如何禁止窗口位置的移动 这个可以实现吗? 属性中有个初始位置设置 我想设置好以后,打开窗口不可移动 |
-- 作者:yangming -- 发布时间:2009/8/23 11:52:00 -- 只有独立窗口才能移动,独立了,移动又何妨呢? |
-- 作者:chenwuwenyu -- 发布时间:2009/8/23 12:00:00 -- 模式窗口也可以移动呀, 我打开窗口的时候利用了一个表视图显示全部列 我不想让移动窗口就能看到原表 所以要求窗口只能关闭,不能移动在屏幕中的位置 |
-- 作者:yangming -- 发布时间:2009/8/23 12:06:00 -- 你说的我不明白,如果不想看到原表,你为何不用主窗口呢? |
-- 作者:czy -- 发布时间:2009/8/23 17:36:00 -- 如果一定要这样做,就在AfterLoad事件中设置代码: For Each c As Col In Tables("表A").Cols Tables("表A").Cols(c.Name).Visible = False Next 然后在BeforeClose事件中设置代码: For Each c As Col In Tables("表A").Cols Tables("表A").Cols(c.Name).Visible = True Next |
-- 作者:chenwuwenyu -- 发布时间:2009/8/23 18:29:00 -- 以下是引用czy在2009-8-23 17:36:00的发言:
如果一定要这样做,就在AfterLoad事件中设置代码: For Each c As Col In Tables("表A").Cols Tables("表A").Cols(c.Name).Visible = False Next 然后在BeforeClose事件中设置代码: For Each c As Col In Tables("表A").Cols Tables("表A").Cols(c.Name).Visible = True Next 跟我设置的正好相反,呵呵 |