Foxtable(狐表)用户栏目专家坐堂 → [求助]录入窗口最少化的位置能调整吗


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

主题:[求助]录入窗口最少化的位置能调整吗

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


加好友 发短信
等级:幼狐 帖子:114 积分:846 威望:0 精华:0 注册:2014/6/8 9:53:00
[求助]录入窗口最少化的位置能调整吗  发帖心情 Post By:2014/7/3 9:17:00 [只看该作者]

录入窗口最少化后,刚好在左下角,挡住了输入法的图标,能自定义吗?

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/7/3 9:19:00 [只看该作者]

可以拖动的

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


加好友 发短信
等级:幼狐 帖子:114 积分:846 威望:0 精华:0 注册:2014/6/8 9:53:00
  发帖心情 Post By:2014/7/3 12:03:00 [只看该作者]

以下是引用Bin在2014-7-3 9:19:00的发言:
可以拖动的

谢谢,除了拖动,能不能设定默认(或代码)让其在其它位置?


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


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

 在SizeChanged加入代码,位置和尺寸自己调整一下

 

Dim obj As object = e.Form.BaseForm
If obj.WindowState = 1 Then
    obj.WindowState = 0
    obj.Left = 0
    obj.Top = 0
    obj.height = 30
    obj.width = 100
    obj.MinimizeBox = False
Else If obj.WindowState = 2 Then
    obj.WindowState = 0
    obj.Left = 200
    obj.Top = 200
    obj.height = 300
    obj.width = 400
    obj.MinimizeBox = True
End If


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


加好友 发短信
等级:幼狐 帖子:114 积分:846 威望:0 精华:0 注册:2014/6/8 9:53:00
  发帖心情 Post By:2014/7/3 15:27:00 [只看该作者]

谢谢!

 


 回到顶部