|
窗口_是否在屏幕内2 | 逻辑型 | |
|
窗口句柄 | 整数型 | | | |
是否自动校正 | 逻辑型 | | | | 顶端保留 | 整数型 | | | | 左边保留 | 整数型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 |
精易_矩形 | 精易_位置和大小 | | |
局_成立 | 逻辑型 | | |
屏幕宽度 | 整数型 | | |
屏幕高度 | 整数型 | | |
精易_矩形 =
窗口_取位置和大小 (窗口句柄
)顶端保留 =
选择 (是否为空 (顶端保留
), 精易_矩形.高度, 顶端保留
)左边保留 =
选择 (是否为空 (左边保留
), 精易_矩形.宽度, 左边保留
)
如果真 (精易_矩形.左边 < 0
或 精易_矩形.顶边 < 0
)
局_成立 = 真
系统_取屏幕分辨率 (, , 屏幕宽度, 屏幕高度, )
如果真 (精易_矩形.左边 + 左边保留 > 屏幕宽度
或 精易_矩形.顶边 + 顶端保留 > 屏幕高度
)
局_成立 = 真
如果真 (局_成立
且 是否自动校正
)
如果真 (精易_矩形.左边 < 0
)
窗口_置位置和大小 (窗口句柄, 0, 精易_矩形.顶边, 精易_矩形.宽度, 精易_矩形.高度
)
如果真 (精易_矩形.顶边 < 0
)
窗口_置位置和大小 (窗口句柄, 精易_矩形.左边, 0, 精易_矩形.宽度, 精易_矩形.高度
)
如果真 (精易_矩形.左边 + 左边保留 > 屏幕宽度
)
窗口_置位置和大小 (窗口句柄, 屏幕宽度 - 左边保留, 精易_矩形.顶边, 精易_矩形.宽度, 精易_矩形.高度
)
如果真 (精易_矩形.顶边 + 顶端保留 > 屏幕宽度
)
窗口_置位置和大小 (窗口句柄, 精易_矩形.左边, 屏幕高度 - 顶端保留, 精易_矩形.宽度, 精易_矩形.高度
)
返回 (局_成立 = 假)