Move GUI when another GUI Moves

[DarkBoost]

Hi... looking for a quick solution, how can I get the RegisterMsg function to initiate when the Calculator moves?

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Process.au3>

Global $title = "child"
Global $exe = "calc.exe"
Global $width = 200
Global $height = 200

ShellExecute($exe)
ProcessWait($exe)

GUICreate($title, $width, $height)
GUISetState()
GUIRegisterMsg($WM_MOVE, "_move")

While 1
    Dim $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            If ProcessExists($exe) Then ProcessClose($exe)
            Exit

    EndSelect
WEnd

Func _move()
    Local $wintitle = WinGetTitle("[CLASS:CalcFrame]", "")
    Local $winpos = WinGetPos($wintitle)

    WinMove($title, "", $winpos[0] + $winpos[2], $winpos[1], $width, $winpos[3])
EndFunc ;=> Function: reposition child window

[UEZ]

Try this way:

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Process.au3>

Global $title = "child"
Global $exe = "calc.exe"
Global $width = 200
Global $height = 200
Global $msg

$run = Run($exe)
ProcessWait($run)

GUICreate($title, $width, $height)
GUISetState()

While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            If ProcessExists($exe) Then ProcessClose($exe)
            GUIDelete()
            Exit
    EndSelect
    If Not ProcessExists($exe) Then Exit GUIDelete()
    $wintitle = WinGetTitle("[CLASS:CalcFrame]", "")
    $winpos = WinGetPos($wintitle)
    WinMove($title, "", $winpos[0] + $winpos[2], $winpos[1], $width, $winpos[3])
WEnd

Br,

UEZ

Edited April 9, 2011 by UEZ

[DarkBoost]

this works well, thanks for the quick response!