[已解决]如何让子窗口跟随父窗口移动

a62105400 · 发表于 2009-8-12 21:04:36

本帖最后由 a62105400 于 2010-11-29 18:23 编辑

即开了子窗口后，移动父窗口子窗口在父窗口的位子不变，跟着移动？？
求助各位大婶

afan · 发表于 2009-8-12 21:31:11

本帖最后由 afan 于 2009-8-12 21:33 编辑

呵呵，这里大婶可能稀有...

http://www.autoitx.com/forum.php?mod=viewthread&tid=2624

lynfr8 · 发表于 2009-8-12 21:37:56

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Form1", 100, 100, 242, 174)
GUISetState(@SW_SHOW)
$Form2 = GUICreate("Form2", 294, 164, 192, 124)
GUISetState(@SW_SHOW)
While 1
        $XY = WinGetPos($Form1)
                        $XY2 = WinGetPos($Form2)
                        If $XY2[0] <> $XY[0] Or $XY2[1] <> $XY[1] Then
                                WinMove($Form1, "", $XY2[0]+50, $XY2[1]+50)
                                WinSetOnTop('Form1','',1)
                        EndIf
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit

        EndSwitch
WEnd

a62105400 · 发表于 2009-8-12 21:54:33

楼上两位 think you very much

rikthhpgf2005 · 发表于 2010-7-16 17:30:00

$Form2 = GUICreate("Form2", 294, 164, 192, 124,"","",$Form1)

78391493 · 发表于 2010-7-16 18:10:32

为什么不重写WM_SIZE消息？每次循环都设置一次浪费性能……

lynfr8 · 发表于 2010-7-16 18:47:38

为什么不重写WM_SIZE消息？每次循环都设置一次浪费性能……
78391493 发表于 2010-7-16 18:10

楼上不妨写个例子和大家分享下

lxz · 发表于 2010-7-17 06:02:06

LS写个例子和大家分享下...

zcx880517 · 发表于 2010-7-17 08:24:58

过来学习的。。顺便帮LZ顶上

78391493 · 发表于 2010-7-19 07:10:43

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Form1", 100, 100, 242, 174)
GUIRegisterMsg($WM_MOVE, "WM_MOVE")
GUIRegisterMsg($WM_SIZE, "MY_MOVE")
GUISetState(@SW_SHOW)
$Form2 = GUICreate("Form2", 294, 164, 192, 124)
GUISetState(@SW_SHOW)

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
        EndSwitch
WEnd

Func WM_MOVE($hWnd, $Msg, $wParam, $lParam)
        $XY = WinGetPos($Form1)
        $XY2 = WinGetPos($Form2)
        WinMove($Form1, "", $XY2[0]+50, $XY2[1]+50)
        WinSetOnTop('Form1','',1)
EndFunc

menfan1 · 发表于 2010-7-20 09:44:11

MY_MOVE()呢？

lin0308 · 发表于 2010-7-20 12:41:45

MY_MOVE()是干什么的呢？

gzguolei · 发表于 2012-4-25 21:11:53

学习中。很有启发

qq82015930 · 发表于 2012-10-25 16:12:58

值得学习。呵呵

yufei8051 · 发表于 2012-11-20 21:58:02

记号上，认真学习

		自动登录	找回密码
密码			加入

[GUI管理] [已解决]如何让子窗口跟随父窗口移动

相关帖子

评分

评分

评分