Foxtable(狐表)用户栏目专家坐堂 → 锚定和停靠


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

主题:锚定和停靠

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


加好友 发短信
等级:狐精 帖子:3082 积分:20596 威望:0 精华:0 注册:2016/3/28 16:57:00
锚定和停靠  发帖心情 Post By:2018/9/9 14:08:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180909140646.png
图片点击可在新窗口打开查看

 


如图,4个panel怎么设置锚定停靠才能布满屏幕啊


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


加好友 发短信
等级:狐精 帖子:3082 积分:20596 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2018/9/9 17:11:00 [显示全部帖子]

好的,上班试试。
有点讨厌那种老板整多大个屏幕的那种,90%都兼顾到了,要去老考虑那不到10%的人,无语得很。

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


加好友 发短信
等级:狐精 帖子:3082 积分:20596 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2018/9/10 9:21:00 [显示全部帖子]

有点甜老师,自适应后,Lanle和Button1就被挡做了呢。

 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180910092041.png
图片点击可在新窗口打开查看

 

目前是用三个spl做的分区,一个上下,在上下里面各放一个左右的,再在每个面变里面放置的一个TabControl

[此贴子已经被作者于2018/9/10 9:26:00编辑过]

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


加好友 发短信
等级:狐精 帖子:3082 积分:20596 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2018/9/10 11:30:00 [显示全部帖子]

老师,偶尔会报错是什么原因呢?

错误所在事件:窗口,主窗口,SizeChanged
详细错误信息:
算术运算导致溢出。


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


加好友 发短信
等级:狐精 帖子:3082 积分:20596 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2018/9/11 15:05:00 [显示全部帖子]

自适应分辨率后出现这样一个问题,最小化项目后,主页页签其他空间都不见了,只剩下页签

正常:

 
图片点击可在新窗口打开查看此主题相关图片如下:正常.png
图片点击可在新窗口打开查看

 

最小化后在最大化:

 
图片点击可在新窗口打开查看此主题相关图片如下:不正常.png
图片点击可在新窗口打开查看


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


加好友 发短信
等级:狐精 帖子:3082 积分:20596 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2018/9/11 15:15:00 [显示全部帖子]

这个判断加了的,还是这种情况

If vars("width") > 500 AndAlso vars("height") > 500 Then
    For Each c As Winform.Control In e.Form.Controls
        c.Left = c.Left * (e.Form.Width / vars("width"))
        c.Top = c.Top * (e.Form.Height / vars("height"))
        c.Width = c.Width * (e.Form.Width / vars("width"))
        c.Height = c.Height * (e.Form.Height / vars("height"))
    Next
    'msgbox(e.Form.Height / vars("height"))
    vars("width") = e.Form.width
    vars("height") = e.Form.height
Else
End If


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


加好友 发短信
等级:狐精 帖子:3082 积分:20596 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2018/9/11 15:49:00 [显示全部帖子]

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


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


加好友 发短信
等级:狐精 帖子:3082 积分:20596 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2018/9/11 16:14:00 [显示全部帖子]

老师,找到另外方式也能解决,在afterload里面也判断一下

If vars("width") > 0 andalso vars("height") > 0 Then

[此贴子已经被作者于2018/9/11 16:14:23编辑过]

 回到顶部