今天宠物迷的小编给各位宠物饲养爱好者分享易语言设置窗口位置的宠物知识,其中也会对易语言怎么设置窗口切换(易语言怎么跳转窗口)进行专业的解释,如果能碰巧解决你现在面临的宠物相关问题,别忘了关注本站哦,现在我们开始吧!
方法/步骤
打开易语言 新建一个Windows窗口程序
我们创建一个按钮 然后找到插入
选择插入窗口
这时我们会发现多了一个窗口1
我们回到启动窗口 双击按钮开始编写代码
我们写 载入 预载入的窗口 写 窗口1
代码如下:
载入 (窗口1, , 真)
点击运行按钮我们试试
我们点击按钮看看弹出窗口的功能实现了没有
当我们点击按钮后发现 又出现了一个窗口 弹出的窗口就是刚才的窗口1 这证明弹出窗口的功能实现了
.版本 2窗口_置位置和大小 (, , , , ) 使用精易模块
.版本 2
.子程序 __启动窗口_创建完毕
_启动窗口.移动 (取屏幕宽度 () - _启动窗口.宽度, 0, , )
这个是把窗口移动到屏幕右上角的
窗口.移动(100,200,500,700) 把窗口移动到100,200的位置,并把宽设为500,高为700
弹出菜单 (菜单, 0, 0)后面2个0就是横和纵坐标 第一个0是X 第二个0是Y
.版本 2 .程序集 窗口程序集1 .子程序 __启动窗口_尺寸被改变 标签1.左边 = (取用户区宽度 () - 标签1.宽度) ÷ 2 标签1.顶边 = (取用户区高度 () - 标签1.高度) ÷ 2
载入 最后的真改为假
就是不等待载入窗口之后的返回直接执行载入后面的语句
而两个窗口都是可以同时动的
载入(窗口1,,假)
.版本 2
.子程序 __启动窗口_创建完毕
_启动窗口.移动 (取屏幕宽度 () - _启动窗口.宽度, 0, , )
这个是把窗口移动到屏幕右上角的
代码如下:
********************************DLL命令定义表:
.版本 2
.DLL命令 取窗口矩形_, 整数型, "user32", "GetWindowRect", , $(b)
.参数 窗口句柄, 整数型
.参数 矩形区域, 矩形_
*******************************自定义数据类型表:
.版本 2
.数据类型 矩形_, , $(a)RECT
.成员 左边, 整数型, , , left
.成员 顶边, 整数型, , , top
.成员 右边, 整数型, , , right
.成员 底边, 整数型, , , bottom
*************************程序集封装函数
.版本 2
.子程序 提取外部程序窗口矩形信息, 逻辑型
.参数 目标窗口句柄, 整数型
.参数 保存矩形信息, 矩形_, 参考
返回 (选择 (取窗口矩形_ (目标窗口句柄, 保存矩形信息) = 0, 假, 真))
********************************调用封装好的函数进行测试
*******添加名为:编辑框_运行结果(编辑框控件),测试_按钮(按钮控件)
.版本 2
.子程序 _测试_按钮_被单击
.局部变量 局部_矩形, 矩形_
.如果真 (提取外部程序窗口矩形信息 (_启动窗口.取窗口句柄 (), 局部_矩形) = 假)
编辑框_运行结果.内容 = “提取失败”
返回 ()
.如果真结束
编辑框_运行结果.内容 = “左边:” + 到文本 (局部_矩形.左边) + #换行符
编辑框_运行结果.加入文本 (“顶边:” + 到文本 (局部_矩形.顶边) + #换行符)
编辑框_运行结果.加入文本 (“右边:” + 到文本 (局部_矩形.右边) + #换行符)
编辑框_运行结果.加入文本 (“底边:” + 到文本 (局部_矩形.底边) + #换行符)
注意:以上代码在windows2003系统,E语言5.1静态版 运行测试正常!
以上解答纯手工实测编写解答!API函数和数据类型直接从E的API助手中导入,确保了其正确性!
本文由宠物迷 百科常识栏目发布,非常欢迎各位朋友分享到个人朋友圈,但转载请说明文章出处“易语言怎么设置窗口切换”
上一篇
老挝灰茶怎么样?
下一篇
短毛犬毛发的梳理方法