Hilfe bei Fenstermove gesucht

  • Hi ich habe dieses skript (alles mit pics unten im anhang) :

    [autoit]


    #include <GUIConstants.au3>
    #include <WindowsConstants.au3>
    #include <StaticConstants.au3>

    [/autoit][autoit][/autoit][autoit]

    Hotkeyset ("{UP}", "_WinMovehoch")
    Hotkeyset ("{DOWN}", "_WinMoverunter")
    Hotkeyset ("{LEFT}", "_WinMovelinks")
    Hotkeyset ("{RIGHT}", "_WinMoverechts")
    Hotkeyset ("{m}", "_WinMovemitte")
    Hotkeyset ("{ESC}", "_ende")

    [/autoit][autoit][/autoit][autoit]

    $gui = GUICreate("Windowmover V 1.0", 230, 210, 370, 220)
    $bg = GuiCtrlCreatePic("Bilddatein\bg.jpg",0,0,230,210)
    GUICtrlSetState(-1, $GUI_DISABLE)
    $mitterot = GuiCtrlCreatePic("Bilddatein\mitterot.gif",93,90,45,30)
    $rhoch1 = GuiCtrlCreatePic("Bilddatein\rhoch1.gif",100,10,30,50)
    $rrunter1 = GuiCtrlCreatePic("Bilddatein\rrunter1.gif",100,150,30,50)
    $rlinks1 = GuiCtrlCreatePic("Bilddatein\rlinks1.gif",15,86,50,33)
    $rrechts1 = GuiCtrlCreatePic("Bilddatein\rrechts1.gif",160,86,50,33)
    $exit = GUICtrlCreateLabel("Exit",10,180,80,20)
    GUICtrlSetBkColor(-1, 0x000000)
    GUICtrlSetFont(-1, 12, 400, 1, "Arial")
    GUICtrlSetColor(-1, 0xFFFFFF)
    GUISetState(@SW_SHOW)

    [/autoit][autoit][/autoit][autoit]

    $xpos = Random(5, 500, 1)
    $ypos = Random(5, 500, 1)
    $gui2 = GUICreate("Krieg mich!", 230, 210, $xpos, $ypos)
    GUISetState(@SW_SHOW)

    [/autoit][autoit][/autoit][autoit]

    While 1
    $msg = GUIGetMsg()

    [/autoit][autoit][/autoit][autoit]

    Select
    Func _ende()
    Exit
    EndFunc
    Case $msg = $rhoch1
    Send ("{UP}")
    Case $msg = $rrunter1
    Send ("{DOWN}")
    Case $msg = $rlinks1
    Send ("{LEFT}")
    Case $msg = $rrechts1
    Send ("{RIGHT}")
    Case $msg = $mitterot
    Send ("{m}")
    Case $msg = $exit
    Exit
    EndSelect
    WEnd

    [/autoit][autoit][/autoit][autoit]

    Func _WinMovehoch()
    $pos = WinGetPos("Windowmover V 1.0")
    WinMove("Windowmover V 1.0", "", $pos[0], $pos[1] -30)
    GuiCtrlCreatePic("Bilddatein\rhoch2.gif",100,10,30,50)
    GuiCtrlCreatePic("Bilddatein\rrunter1.gif",100,150,30,50)
    GuiCtrlCreatePic("Bilddatein\rlinks1.gif",15,86,50,33)
    GuiCtrlCreatePic("Bilddatein\rrechts1.gif",160,86,50,33)
    GuiCtrlCreatePic("Bilddatein\mitterot.gif",93,90,45,30)
    EndFunc

    Func _WinMoverunter()
    $pos = WinGetPos("Windowmover V 1.0")
    WinMove("Windowmover V 1.0", "", $pos[0], $pos[1] + 30)
    GuiCtrlCreatePic("Bilddatein\rrunter2.gif",100,150,30,50)
    GuiCtrlCreatePic("Bilddatein\rhoch1.gif",100,10,30,50)
    GuiCtrlCreatePic("Bilddatein\rlinks1.gif",15,86,50,33)
    GuiCtrlCreatePic("Bilddatein\rrechts1.gif",160,86,50,33)
    GuiCtrlCreatePic("Bilddatein\mitterot.gif",93,90,45,30)
    EndFunc

    Func _WinMovelinks()
    $pos = WinGetPos("Windowmover V 1.0")
    WinMove("Windowmover V 1.0", "", $pos[0] -30 , $pos[1])
    GuiCtrlCreatePic("Bilddatein\rlinks2.gif",15,86,50,33)
    GuiCtrlCreatePic("Bilddatein\rrunter1.gif",100,150,30,50)
    GuiCtrlCreatePic("Bilddatein\rhoch1.gif",100,10,30,50)
    GuiCtrlCreatePic("Bilddatein\rrechts1.gif",160,86,50,33)
    GuiCtrlCreatePic("Bilddatein\mitterot.gif",93,90,45,30)
    EndFunc

    Func _WinMoverechts()
    $pos = WinGetPos("Windowmover V 1.0")
    WinMove("Windowmover V 1.0", "", $pos[0] +30 , $pos[1])
    GuiCtrlCreatePic("Bilddatein\rrechts2.gif",160,86,50,33)
    GuiCtrlCreatePic("Bilddatein\rrunter1.gif",100,150,30,50)
    GuiCtrlCreatePic("Bilddatein\rhoch1.gif",100,10,30,50)
    GuiCtrlCreatePic("Bilddatein\rlinks1.gif",15,86,50,33)
    GuiCtrlCreatePic("Bilddatein\mitterot.gif",93,90,45,30)
    EndFunc

    Func _WinMovemitte()
    $pos = WinGetPos("Windowmover V 1.0")
    WinMove("Windowmover V 1.0", "", 370, 220)
    GuiCtrlCreatePic("Bilddatein\rhoch1.gif",100,10,30,50)
    GuiCtrlCreatePic("Bilddatein\rrunter1.gif",100,150,30,50)
    GuiCtrlCreatePic("Bilddatein\rlinks1.gif",15,86,50,33)
    GuiCtrlCreatePic("Bilddatein\rrechts1.gif",160,86,50,33)
    $mittelabel1 = GuiCtrlCreateLabel("(C) 2009, Nathan",93,90,50,35)
    GUICtrlSetColor ( -1, 0xE50033)
    GUICtrlSetBkColor ( -1, 0x000000)
    EndFunc

    [/autoit]


    Ich möchte nun wenn man mit dem bewegbaren fenster also hier Windowmover V 1.0
    auf dem "Krieg mich!"- fenster ist, also wenn die coordinaten von den fenstern gleich sind
    etwas passiert zum beispiel ne msg: super du hast es geschafff!!
    ich hoffe ihr könnt mir helfen!!

  • check this out ::

    [autoit][/autoit][autoit][/autoit][autoit]

    $return = _check()
    ToolTip($return)

    [/autoit][autoit][/autoit][autoit]

    Func _check() ; 0 für nicht übereinstimmend ; 1 für übereinstimmend
    $size_1 = WinGetPos("titel von fenster 1") ; hier name von fenster 1 eingeben
    $size_2 = WinGetPos("titel von fenster 2"); hier name von fenster 2 eingeben

    [/autoit][autoit][/autoit][autoit]

    If $size_1[0] = $size_2[0] Then ; prüfen ob x pos gleich
    If $size_1[1] = $size_2[1] Then Return "1" ; prüfen ob y pos gleich

    [/autoit][autoit][/autoit][autoit]

    EndIf
    Return "0" ; pos nicht gleich

    [/autoit][autoit][/autoit][autoit]

    EndFunc ;==>_check

    [/autoit]
  • So z.B.

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>
    #include <WindowsConstants.au3>
    #include <StaticConstants.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Hotkeyset ("{UP}", "_WinMovehoch")
    Hotkeyset ("{DOWN}", "_WinMoverunter")
    Hotkeyset ("{LEFT}", "_WinMovelinks")
    Hotkeyset ("{RIGHT}", "_WinMoverechts")
    Hotkeyset ("{m}", "_WinMovemitte")
    Hotkeyset ("{ESC}", "_ende")

    [/autoit] [autoit][/autoit] [autoit]

    Do
    $xpos = Random(5, 500, 1)
    Until Not Mod($xpos, 30)

    [/autoit] [autoit][/autoit] [autoit]

    Do
    $ypos = Random(5, 500, 1)
    Until Not Mod($ypos, 30)

    [/autoit] [autoit][/autoit] [autoit]

    $gui = GUICreate("Windowmover V 1.0", 230, 210, $xpos, $ypos, -1, 0x8)
    GUISetBkColor(0x0)
    $mitterot = GuiCtrlCreatePic("Bilddatein\mitterot.gif",93,90,45,30)
    $rhoch1 = GuiCtrlCreatePic("Bilddatein\rhoch1.gif",100,10,30,50)
    $rrunter1 = GuiCtrlCreatePic("Bilddatein\rrunter1.gif",100,150,30,50)
    $rlinks1 = GuiCtrlCreatePic("Bilddatein\rlinks1.gif",15,86,50,33)
    $rrechts1 = GuiCtrlCreatePic("Bilddatein\rrechts1.gif",160,86,50,33)
    $exit = GUICtrlCreateLabel("Exit",10,180,80,20)
    GUICtrlSetBkColor(-1, 0x000000)
    GUICtrlSetFont(-1, 12, 400, 1, "Arial")
    GUICtrlSetColor(-1, 0xFFFFFF)
    GUISetState(@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit]

    Do
    $xpos = Random(5, 500, 1)
    Until Not Mod($xpos, 30)

    [/autoit] [autoit][/autoit] [autoit]

    Do
    $ypos = Random(5, 500, 1)
    Until Not Mod($ypos, 30)

    $gui2 = GUICreate("Krieg mich!", 230, 210, $xpos, $ypos)
    GUISetState(@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    Sleep(10)
    $msg = GUIGetMsg()

    [/autoit] [autoit][/autoit] [autoit]

    Select
    Case $msg = $rhoch1
    _WinMovehoch()
    Case $msg = $rrunter1
    _WinMovehoch()
    Case $msg = $rlinks1
    _WinMovelinks()
    Case $msg = $rrechts1
    _WinMoverechts()
    Case $msg = $mitterot
    _WinMovemitte()
    Case $msg = $exit
    Exit
    EndSelect
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func _Ende()
    Exit
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func _WinMovehoch()
    _DeSelectAll()
    GUICtrlSetImage($rhoch1, "Bilddatein\rhoch2.gif")
    $pos = WinGetPos("Windowmover V 1.0")
    WinMove("Windowmover V 1.0", "", $pos[0], $pos[1] -30)
    _Check()
    EndFunc

    Func _WinMoverunter()
    _DeSelectAll()
    GUICtrlSetImage($rrunter1, "Bilddatein\rrunter2.gif")
    $pos = WinGetPos("Windowmover V 1.0")
    WinMove("Windowmover V 1.0", "", $pos[0], $pos[1] + 30)
    _Check()
    EndFunc

    Func _WinMovelinks()
    _DeSelectAll()
    GUICtrlSetImage($rlinks1, "Bilddatein\rlinks2.gif")
    $pos = WinGetPos("Windowmover V 1.0")
    WinMove("Windowmover V 1.0", "", $pos[0] -30 , $pos[1])
    _Check()
    EndFunc

    Func _WinMoverechts()
    _DeSelectAll()
    GUICtrlSetImage($rrechts1, "Bilddatein\rrechts2.gif")
    $pos = WinGetPos("Windowmover V 1.0")
    WinMove("Windowmover V 1.0", "", $pos[0] +30 , $pos[1])
    _Check()
    EndFunc

    Func _WinMovemitte()
    _DeSelectAll()
    $pos = WinGetPos("Windowmover V 1.0")
    WinMove("Windowmover V 1.0", "", 370, 220)
    _Check()
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func _DeSelectAll()
    GUICtrlSetImage($rhoch1, "Bilddatein\rhoch1.gif")
    GUICtrlSetImage($rrunter1, "Bilddatein\rrunter1.gif")
    GUICtrlSetImage($rlinks1, "Bilddatein\rlinks1.gif")
    GUICtrlSetImage($rrechts1, "Bilddatein\rrechts1.gif")
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func _Check()
    $Pos1 = WinGetPos("Windowmover V 1.0")
    $Pos2 = WinGetPos("Krieg mich!")
    If $Pos1[0] = $Pos2[0] And $Pos1[1] = $Pos2[1] Then MsgBox(262144, "Hurra", "Geschafft")
    EndFunc

    [/autoit]