Foxtable(狐表)用户栏目专家坐堂 → [求助]定制窗口宽高


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

主题:[求助]定制窗口宽高

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


加好友 发短信
等级:七尾狐 帖子:1701 积分:11355 威望:0 精华:0 注册:2015/6/22 8:11:00
[求助]定制窗口宽高  发帖心情 Post By:2019/10/20 9:55:00 [显示全部帖子]

老师,添加下面代码后报错


e.Form.baseform.width= 1300   '窗口宽
e.Form.baseform.height= 600  '窗口高



.NET Framework 版本:2.0.50727.8669
Foxtable 版本:2017.4.22.1
错误所在事件:窗口,系统,SizeChanged
详细错误信息:
未将对象引用设置到对象的实例。


这是窗口,系统,SizeChanged


Dim spc1 As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
Dim btn As WinForm.Button = e.Form.Controls("隐藏分区")
If spc1.Panel1.Collapsed = True Then
    btn.Left = spc1.Left + spc1.SplitterDistance - 5
Else
    btn.Left  = spc1.Left + spc1.SplitterDistance
End If


[此贴子已经被作者于2019/10/20 10:02:34编辑过]

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


加好友 发短信
等级:七尾狐 帖子:1701 积分:11355 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2019/10/20 23:01:00 [显示全部帖子]

老师,是独立窗口的AfterLoad事件。

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


加好友 发短信
等级:七尾狐 帖子:1701 积分:11355 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2019/10/21 10:06:00 [显示全部帖子]

老师,没有用。


If e.form.width = 0 OrElse e.form.height= 0  Then Return
Dim spc1 As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
Dim btn As WinForm.Button = e.Form.Controls("隐藏分区")
If spc1.Panel1.Collapsed = True Then
    btn.Left = spc1.Left + spc1.SplitterDistance - 5
Else
    btn.Left  = spc1.Left + spc1.SplitterDistance
End If

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


加好友 发短信
等级:七尾狐 帖子:1701 积分:11355 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2019/10/21 12:29:00 [显示全部帖子]

老师,系统窗口定制窗口大小后报错

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

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


加好友 发短信
等级:七尾狐 帖子:1701 积分:11355 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2019/10/21 17:51:00 [显示全部帖子]

谢谢老师

 回到顶部