Foxtable(狐表)用户栏目专家坐堂 → 限制共有窗口大小的问题


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

主题:限制共有窗口大小的问题

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


加好友 发短信
等级:幼狐 帖子:158 积分:1536 威望:0 精华:0 注册:2018/4/11 21:01:00
限制共有窗口大小的问题  发帖心情 Post By:2019/6/26 15:07:00 [只看该作者]

上和左的窗口我想限制改变大小,把代码写在sizechanged事件中,之前可以的,最近不知道为什么代码没用了。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/6/26 16:05:00 [只看该作者]

比如

 

Dim dh = e.Form.panel.parent.parent.parent
If dh IsNot Nothing Then
    dh.height = 120
End If


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


加好友 发短信
等级:幼狐 帖子:158 积分:1536 威望:0 精华:0 注册:2018/4/11 21:01:00
  发帖心情 Post By:2019/6/27 7:34:00 [只看该作者]

这语句不行

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/6/27 9:50:00 [只看该作者]

以下是引用vimin在2019/6/27 7:34:00的发言:
这语句不行

 

我测试没问题,请认认真真测试。

 

Dim dh = e.Form.panel.parent.parent.parent
If dh IsNot Nothing Then
    dh.height = 120
End If


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


加好友 发短信
等级:幼狐 帖子:158 积分:1536 威望:0 精华:0 注册:2018/4/11 21:01:00
  发帖心情 Post By:2019/6/28 9:18:00 [只看该作者]

我昨天和今天都测试了,直接把代码复制进去的,真的不行。我的是最新版的foxtable。之前我那个代码是可以用的,好像是更新版本之后不是那么好用了

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/6/28 9:57:00 [只看该作者]

改成

 

Dim dh = e.Form.panel.parent.parent
If dh IsNot Nothing Then
    dh.height = 120
    dh.parent.height = 120
End If


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


加好友 发短信
等级:幼狐 帖子:158 积分:1536 威望:0 精华:0 注册:2018/4/11 21:01:00
  发帖心情 Post By:2019/6/28 12:36:00 [只看该作者]

终于可以了,太厉害了!感谢感谢

 回到顶部