在此求大神帮忙写个代码出个招. 窗口1的移动在启动窗口内移动，上下左右只靠边，

162623

求助大神指点 弄不明白啦 这个 在线坐等 谢谢

位与

  

子程序名	返回值类型	公开	备 注
_窗口2_位置被改变

变量名	类 型	静态	数组	备 注
A	精易_矩形
B	精易_矩形

A ＝ 窗口_取位置和大小 (窗口1.取窗口句柄 ())
B ＝ 窗口_取位置和大小 (窗口2.取窗口句柄 ())
如果真 (B.左边 ＜ A.左边)
窗口2.左边 ＝ A.左边

如果真 (B.顶边 ＜ A.顶边)
窗口2.顶边 ＝ A.顶边

如果真 (B.顶边 ＞ A.顶边 ＋ A.底边 － B.底边)
窗口2.顶边 ＝ A.顶边 ＋ A.底边 － B.底边

如果真 (B.左边 ＞ A.左边 ＋ A.右边 － B.右边)
窗口2.左边 ＝ A.左边 ＋ A.右边 － B.右边

.版本 2<br /> <br /> .子程序 _窗口2_位置被改变<br /> .局部变量 A, 精易_矩形<br /> .局部变量 B, 精易_矩形<br /> <br /> A ＝ 窗口_取位置和大小 (窗口1.取窗口句柄 ())<br /> B ＝ 窗口_取位置和大小 (窗口2.取窗口句柄 ())<br /> .如果真 (B.左边 ＜ A.左边)<br />     窗口2.左边 ＝ A.左边<br /> .如果真结束<br /> <br /> .如果真 (B.顶边 ＜ A.顶边)<br />     窗口2.顶边 ＝ A.顶边<br /> .如果真结束<br /> <br /> .如果真 (B.顶边 ＞ A.顶边 ＋ A.底边 － B.底边)<br />     窗口2.顶边 ＝ A.顶边 ＋ A.底边 － B.底边<br /> .如果真结束<br /> <br /> .如果真 (B.左边 ＞ A.左边 ＋ A.右边 － B.右边)<br />     窗口2.左边 ＝ A.左边 ＋ A.右边 － B.右边

demo.e (737.33 KB, 下载次数: 8)

2019-1-6 10:58 上传

点击文件名下载附件

墓志铭

先置父窗口，移动的时候再加个判断就行了

162623

墓志铭 发表于 2019-1-6 10:28
先置父窗口，移动的时候再加个判断就行了

可以帮忙弄个代码吗 这个我弄啦好久 没搞懂

162623

墓志铭 发表于 2019-1-6 10:28
先置父窗口，移动的时候再加个判断就行了

判断不会写 谢谢麻烦指导一下

162623

位与 发表于 2019-1-6 10:59
[e=1].版本 2

.子程序 _窗口2_位置被改变

谢谢大神  非常感谢

补充内容 (2019-1-6 14:21):
大神你这个可是可以 问题出来啦 窗口1 移动 窗口2不跟着走 脱轨啦  哈哈 这个怎么改一下呢