Mouseklickprobleme

  • Hi,
    eigentlich funzt alles aber ich will, dass wenn ich das fenster verschieb der mouseklick immer noch auf den suchen button bei google klickt und nicht an die stelle wo der button war bevor ich das gui verschoben hab
    hier der code:

    [autoit]

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

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

    HotKeySet("{ESC}", "ende")

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

    Opt("CaretCoordMode", 0)
    $oIE = ObjCreate("Shell.Explorer.2")

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

    GUICreate ( "",(@DesktopWidth), (@DesktopHeight-65),0,0)
    $inetob = GUICtrlCreateObj($oIE,0,50,(@DesktopWidth),(@DesktopHeight-150))
    $backbutton = GuiCtrlCreateButton("Zurück",20, 20, 50, 20)
    GUICtrlSetState ($backbutton, $GUI_DISABLE)
    $forwardbutton = GuiCtrlCreateButton("Vor",80, 20, 50, 20)
    GUICtrlSetState ($forwardbutton, $GUI_DISABLE)
    $homebutton = GuiCtrlCreateButton("Home",140, 20, 50, 20)
    $stopbutton = GuiCtrlCreateButton("Stop",200, 20, 50, 20)
    $adresseinput = GUICtrlCreateInput("",280, 20,400, 20)
    $losbutton = GUICtrlCreateButton("--> Los!",700, 20, 60, 20)
    $buttonklick = GUICtrlCreateButton("buttonklick aktivieren",780, 20, 150, 20)
    GUISetState (@SW_SHOW)

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

    $oIE.navigate("http://google.de")
    While 1
    $msg = GUIGetMsg()

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

    Select
    Case $msg = $homebutton
    $oIE.navigate("http://google.de")
    GUICtrlSetState ($backbutton, $GUI_ENABLE)
    Case $msg = $backbutton
    $oIE.GoBack
    GUICtrlSetState ($forwardbutton, $GUI_ENABLE)
    Case $msg = $forwardbutton
    $oIE.GoForward
    Case $msg = $stopbutton
    $oIE.Stop
    Case $msg = $losbutton
    $oIE.navigate(GUICtrlRead($adresseinput))
    GUICtrlSetState ($backbutton, $GUI_ENABLE)
    Case $msg = $GUI_EVENT_CLOSE
    exit
    Case $msg = $buttonklick

    HotKeySet("1", "buttonklick")

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

    Func buttonklick()
    MouseClick("left", 437, 300)
    EndFunc

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

    EndSelect
    Wend

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

    Func ende()
    Exit
    EndFunc

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

    Exit

    [/autoit]
    [autoit]


    Func Ulam($n)
    Return 1
    EndFunc

    [/autoit]


    Rekursion FTW :D

    Einmal editiert, zuletzt von retrokid (30. November 2009 um 17:43)

  • das geht nicht ich will das fenster ja verschieben können und es soll immer noch auf den buttongeklickt werden
    vllt könnte man es ja mit controlclick machen versuchts mal ;)

    [autoit]


    Func Ulam($n)
    Return 1
    EndFunc

    [/autoit]


    Rekursion FTW :D

  • Zu faul es selber zu machen, hm?

    Spoiler anzeigen
    [autoit]

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

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

    HotKeySet("{1}", "buttonklick")
    HotKeySet("{ESC}", "ende")

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

    Opt("CaretCoordMode", 0)
    Opt("MouseCoordMode", 2)
    $oIE = ObjCreate("Shell.Explorer.2")

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

    $width = 1024
    $height = 768

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

    GUICreate ( "",$width, ($height-65),0,0)
    $inetob = GUICtrlCreateObj($oIE,0,50,($width),($height-150))
    $backbutton = GuiCtrlCreateButton("Zurück",20, 20, 50, 20)
    GUICtrlSetState ($backbutton, $GUI_DISABLE)
    $forwardbutton = GuiCtrlCreateButton("Vor",80, 20, 50, 20)
    GUICtrlSetState ($forwardbutton, $GUI_DISABLE)
    $homebutton = GuiCtrlCreateButton("Home",140, 20, 50, 20)
    $stopbutton = GuiCtrlCreateButton("Stop",200, 20, 50, 20)
    $adresseinput = GUICtrlCreateInput("",280, 20,400, 20)
    $losbutton = GUICtrlCreateButton("--> Los!",700, 20, 60, 20)
    $buttonklick = GUICtrlCreateButton("buttonklick aktivieren",780, 20, 150, 20)
    GUISetState (@SW_SHOW)

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

    $oIE.navigate("http://google.de")
    While 1
    $msg = GUIGetMsg()

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

    Select
    Case $msg = $homebutton
    $oIE.navigate("http://google.de")
    GUICtrlSetState ($backbutton, $GUI_ENABLE)
    Case $msg = $backbutton
    $oIE.GoBack
    GUICtrlSetState ($forwardbutton, $GUI_ENABLE)
    Case $msg = $forwardbutton
    $oIE.GoForward
    Case $msg = $stopbutton
    $oIE.Stop
    Case $msg = $losbutton
    $oIE.navigate(GUICtrlRead($adresseinput))
    GUICtrlSetState ($backbutton, $GUI_ENABLE)
    Case $msg = $GUI_EVENT_CLOSE
    exit
    Case $msg = $buttonklick

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

    EndSelect
    Wend

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

    Func buttonklick()
    MouseClick("left", 434, 274)
    EndFunc
    Func ende()
    Exit
    EndFunc

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

    Exit

    [/autoit] [autoit][/autoit] [autoit][/autoit]
  • sorry, muss mich bei dir entschuldingen
    bin nicht zu faul, nur bei mir hats iwie nicht geklappt
    thx du hast mir sehr geholfen :D :D :D

    [autoit]


    Func Ulam($n)
    Return 1
    EndFunc

    [/autoit]


    Rekursion FTW :D

  • Kein Problem.
    Du musst nur dran denken: Deine GUI MUSS dafür eine feste größe haben. Sonst klappt das nicht (da sich der Button dann an anderen Koordinaten befindet.).
    Ich habe es grade noch mit relativen koordinaten

    [autoit]

    MouseClick("left", @DesktopWidth/100*43.5,@DesktopHeight/100*26)

    [/autoit]

    probiert, aber das hat auf dem Breitbild-Monitor meiner Freundin dann nicht funktioniert.
    Deswegen besser ne feste größe.

    Ich empfehle trotzdem Controlclick