精易论坛

标题: 【窗口_置父()】命令不能置父 [打印本页]

---

作者: 詠不言敗    时间: 2014-12-28 19:57
标题: 【窗口_置父()】命令不能置父


窗口_置父()命令不能置父
这里有一个代码可以正确置父，望采纳

  

子程序名	返回值类型	公开	备 注
彗星置父窗口			真正的置父窗口 By:邓学彬(泪闯天涯)
参数名	类 型	参考	可空	数组	备 注
父窗口句柄	整数型
子窗口句柄	整数型
子窗口左边	整数型				留空默认为0
子窗口顶边	整数型				留空默认为0
子窗口宽度	整数型				留空宽度不变
子窗口高度	整数型				留空高度不变

变量名	类 型	静态	数组	备 注
dwStyle	整数型
dwNewStyle	整数型
Rect	RECT

' 设置父窗口
SetParent (子窗口句柄, 父窗口句柄)
' 设置窗口样式 去除WS_POPUP,加入WS_CHILD
dwStyle ＝ GetWindowLong (子窗口句柄, -16)
dwNewStyle ＝ 位与 (dwStyle, 位取反 ( #WS_POPUP )) ' 去除WS_POPUP
dwNewStyle ＝ 位或 (dwNewStyle, #WS_CHILD ) ' 加入WS_CHILD
如果真 (dwStyle ≠ dwNewStyle)
' 本源码来自易语言资源网(www.5A5X.com)
SetWindowLong (子窗口句柄, #GWL_STYLE, dwNewStyle)
' 调整子窗口位置
GetWindowRect (子窗口句柄, Rect)
如果真 (是否为空 (子窗口宽度))
子窗口宽度 ＝ Rect.Right － Rect.Left
' 本源码来自易语言资源网(www.5A5X.com)
如果真 (是否为空 (子窗口高度))
子窗口高度 ＝ Rect.Bottom － Rect.Top
MoveWindow (子窗口句柄, 子窗口左边, 子窗口顶边, 子窗口宽度, 子窗口高度, 1)

.版本 2<br /> <br /> .子程序 彗星置父窗口, , 公开, 真正的置父窗口 By:邓学彬(泪闯天涯)<br /> .参数 父窗口句柄, 整数型<br /> .参数 子窗口句柄, 整数型<br /> .参数 子窗口左边, 整数型, 可空, 留空默认为0<br /> .参数 子窗口顶边, 整数型, 可空, 留空默认为0<br /> .参数 子窗口宽度, 整数型, 可空, 留空宽度不变<br /> .参数 子窗口高度, 整数型, 可空, 留空高度不变<br /> .局部变量 dwStyle, 整数型<br /> .局部变量 dwNewStyle, 整数型<br /> .局部变量 Rect, RECT<br /> <br /> ' 设置父窗口<br /> SetParent (子窗口句柄, 父窗口句柄)<br /> <br /> ' 设置窗口样式 去除WS_POPUP,加入WS_CHILD<br /> dwStyle ＝ GetWindowLong (子窗口句柄, -16)<br /> <br /> dwNewStyle ＝ 位与 (dwStyle, 位取反 (#WS_POPUP)) ' 去除WS_POPUP<br /> dwNewStyle ＝ 位或 (dwNewStyle, #WS_CHILD) ' 加入WS_CHILD<br /> .如果真 (dwStyle ≠ dwNewStyle)<br /> ' 本源码来自易语言资源网(www.5A5X.com)<br /> SetWindowLong (子窗口句柄, #GWL_STYLE, dwNewStyle)<br /> .如果真结束<br /> ' 调整子窗口位置<br /> GetWindowRect (子窗口句柄, Rect)<br /> .如果真 (是否为空 (子窗口宽度))<br /> 子窗口宽度 ＝ Rect.Right － Rect.Left<br /> ' 本源码来自易语言资源网(www.5A5X.com)<br /> .如果真结束<br /> .如果真 (是否为空 (子窗口高度))<br /> 子窗口高度 ＝ Rect.Bottom － Rect.Top<br /> .如果真结束<br /> MoveWindow (子窗口句柄, 子窗口左边, 子窗口顶边, 子窗口宽度, 子窗口高度, 1)

彗星置父窗口.zip (3.9 KB, 下载次数: 153)

2014-12-28 20:07 上传

点击文件名下载附件
下载积分: 精币 -2 枚

利用泪闯天涯的源码可以成功置父，而精易模块不能！

---

作者: Onsxsen    时间: 2014-12-28 20:06
如  多么明显的字眼  这个提示只是给你说明复制会是这样一种形式而已

---

作者: 萧阳天    时间: 2014-12-28 20:45
你能举个栗子吗？
窗口_置父  都是用到SetParent，慧星的第一条命令也是用到了SetParent，两者的区别在那里？
都用了同样的API为什么说精易的就不行了呢！
就为了说慧星置父后设置了窗口样式和位置(包括刷新)，马上就能看到已经置入父窗口，单凭这一点不能符合逻辑。
SetParent这个API置父后并不会刷新窗口，需要手动刷新窗口，明明 用 窗口_置父已经成功了，也许你看不到而已，并不能代表咱们精易就不行了，都是用同样的API同样的接口，难道用他的就高大上点了嘛，你手动刷新或到已置入的父窗口点一下就出来了。模块源码大家都能看得到，你不会说慧星下面的代码是什么功能你看不懂！一个命令的存在，自然有用得到的地方，就为了一些不完善的地方而否认咱们的东西不行，多让人心酸呢，还请(看源码后)发贴三

---

作者: 詠不言敗    时间: 2014-12-29 12:10

萧阳天 发表于 2014-12-28 20:45
你能举个栗子吗？
窗口_置父  都是用到SetParent，慧星的第一条命令也是用到了SetParent，两者的区别在那 ...

那我为什么不能置父

---

作者: 1054114709    时间: 2014-12-29 16:57
如  多么明显的字眼  这个提示只是给你说明复制会是这样一种形式而已

---

作者: 詠不言敗    时间: 2014-12-29 18:33

萧阳天 发表于 2014-12-28 20:45
你能举个栗子吗？
窗口_置父  都是用到SetParent，慧星的第一条命令也是用到了SetParent，两者的区别在那 ...

说的那么冲！那你倒是给出源码！我点了父窗口就是没有显示出来！不就是给出个建议嘛！用得着那么生气吗？至于吗？我不知道彗星跟精易有什么过节！但我真不知道这个命令怎么用，怎么让子窗口显示出来，你行你给例子！OK？不要说我激动，是你激动在先！

---

作者: 天业电子通讯科    时间: 2016-5-4 16:40
支持大神  路过采纳看看

---

作者: fjgh    时间: 2019-10-12 14:29
支持大神！！！

---

作者: aliku    时间: 2019-10-18 18:13
路过顶帖~~~~~~~~~~~

---

作者: long1983    时间: 2019-12-23 15:15
看一看学习一下

---

作者: gay酱    时间: 2021-1-30 14:10
支持支持支持支持支持支持支持支持

---

作者: zifeiyu    时间: 2021-8-27 19:47
....................

---

作者: 1749670650    时间: 2023-12-14 14:59
55555555555555555555555555

---

作者: 1749670650    时间: 2023-12-14 14:59
66666666666666666666666666666666666666666666

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4