易语言无边框移动窗口和改变尺寸

移动窗口,你可以用:

_启动窗口.发送信息 (161, 2, 0)

改变窗口大小,你可以用:

_启动窗口.发送信息 (274, 61441, 0) ' 可以调整窗口左边的边框

_启动窗口.发送信息 (274, 61442, 0) ' 可以调整窗口右边的边框

_启动窗口.发送信息 (274, 61443, 0) ' 可以调整窗口上边的边框

_启动窗口.发送信息 (274, 61446, 0) ' 可以调整窗口下边的边框

_启动窗口.发送信息 (274, 61444, 0) ' 可以同时调整窗口上边和左边的边框

_启动窗口.发送信息 (274, 61445, 0) ' 可以同时调整窗口上边和右边的边框

_启动窗口.发送信息 (274, 61447, 0) ' 可以同时调整窗口下边和左边的边框

_启动窗口.发送信息 (274, 61448, 0) ' 可以同时调整窗口下边和右边的边框

这是我之前的项目实际写的代码

.版本 2

.子程序 __启动窗口_鼠标位置被移动, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

.判断开始 (纵向位置 < 5)
    .判断开始 (横向位置 < 5)
        _启动窗口.鼠标指针 = { 11 }  ' 左上角调大小
    .判断 (宽度 - 横向位置 < 5)
        _启动窗口.鼠标指针 = { 9 }  ' 右上角调大小
    .默认
        _启动窗口.鼠标指针 = { 10 }  ' 从上边调高低
    .判断结束

.判断 (高度 - 纵向位置 < 5)
    .判断开始 (横向位置 < 5)
        _启动窗口.鼠标指针 = { 9 }  ' 左下角调大小
    .判断 (宽度 - 横向位置 < 5)
        _启动窗口.鼠标指针 = { 11 }  ' 右下角调大小
    .默认
        _启动窗口.鼠标指针 = { 10 }  ' 从下边调高低
    .判断结束

.默认

    .判断开始 (横向位置 < 5)
        _启动窗口.鼠标指针 = { 12 }  ' 左边调大小
    .判断 (宽度 - 横向位置 < 5)
        _启动窗口.鼠标指针 = { 12 }  ' 右边调大小
    .默认
        _启动窗口.鼠标指针 = { 0 }  ' 整个移动
    .判断结束

.判断结束
点赞

发表回复

昵称和uid可以选填一个,填邮箱必填(留言回复后将会发邮件给你)
tips:输入uid可以快速获得你的昵称和头像