Foxtable(狐表)用户栏目专家坐堂 → 发布项目问题


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

主题:发布项目问题

帅哥哟,离线,有人找我吗?
大红袍
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/22 14:33:00 [只看该作者]

Dim mj As Double
mj =e.Form.width/ vars("width")
For Each c As WinForm.Control In e.Form.Controls
    If Typeof c Is WinForm.Button Then '判断控件是否是文本框
        Dim t As WinForm.Button = c '使用特定类型的变量引用控件
        t.Left = c.Left * mj
        t.Top = c.Top * mj
        t.Width = c.Width * mj
        t.Height = c.Height * mj
    End If
Next
vars("width") = e.Form.width
vars("height") = e.Form.height

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


加好友 发短信
等级:二尾狐 帖子:524 积分:3676 威望:0 精华:0 注册:2012/7/27 10:28:00
  发帖心情 Post By:2016/8/22 14:35:00 [只看该作者]

里面还有一个订单主表,好像也不行,帮忙看看

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/22 15:04:00 [只看该作者]

以下是引用hongyefor在2016/8/22 14:35:00的发言:
里面还有一个订单主表,好像也不行,帮忙看看

 

我测试没问题。缩放什么的兼容性不是很好,建议你还是固定窗口大小吧,用1024*768这种。


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


加好友 发短信
等级:狐精 帖子:3106 积分:20733 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2016/8/22 15:37:00 [只看该作者]

其实就是你的锚定和停靠使用不对,我的导和你的基本一样,不存在你那样的问题。

 


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

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

 回到顶部
总数 14 上一页 1 2