Hilfe bei Gui

    • Offizieller Beitrag

    Du sollst doch keine Bots machen!

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    $Form1 = GUICreate("Haupt Steuerelement", 346, 580, 929, 0)
    $TabforGames = GUICtrlCreateTab(8, 8, 329, 561)
    GUICtrlSetResizing(-1, $GUI_DOCKWIDTH + $GUI_DOCKHEIGHT)
    $Anwendungen = GUICtrlCreateTabItem("Anwendungen")
    $Metin = GUICtrlCreateButton("Metin 2", 24, 40, 297, 65, $WS_GROUP)
    GUICtrlSetFont(-1, 13, 400, 0, "Arial Black")
    GUICtrlSetCursor(-1, 0)
    $Firefox = GUICtrlCreateButton("Firefox", 24, 112, 297, 65, $WS_GROUP)
    GUICtrlSetFont(-1, 13, 400, 0, "Arial Black")
    GUICtrlSetCursor(-1, 0)
    $Office = GUICtrlCreateButton("Office", 24, 184, 297, 65, $WS_GROUP)
    GUICtrlSetFont(-1, 13, 400, 0, "Arial Black")
    GUICtrlSetCursor(-1, 0)
    $Arbeitsplatz = GUICtrlCreateButton("Arbeitsplatz", 24, 256, 297, 65, $WS_GROUP)
    GUICtrlSetFont(-1, 13, 400, 0, "Arial Black")
    GUICtrlSetCursor(-1, 0)
    $Outlook = GUICtrlCreateButton("Outlook", 24, 328, 297, 65, $WS_GROUP)
    GUICtrlSetFont(-1, 13, 400, 0, "Arial Black")
    GUICtrlSetCursor(-1, 0)
    $MusikPlayer = GUICtrlCreateButton("Musik Player", 24, 400, 297, 65, $WS_GROUP)
    GUICtrlSetFont(-1, 13, 400, 0, "Arial Black")
    GUICtrlSetCursor(-1, 0)
    $Liste_der_Spiele = GUICtrlCreateButton("Liste aller Spiele", 24, 472, 297, 65, $WS_GROUP)
    GUICtrlSetFont(-1, 13, 400, 0, "Arial Black")
    GUICtrlSetCursor(-1, 0)
    $MetinBots = GUICtrlCreateTabItem("Metin Bots")
    $PickUp = GUICtrlCreateButton("Pick up", 24, 40, 297, 65, $WS_GROUP)
    GUICtrlSetFont(-1, 13, 400, 0, "Arial Black")
    GUICtrlSetCursor(-1, 0)
    $AutoSchlag = GUICtrlCreateButton("Auto-Schlag", 24, 112, 297, 65, $WS_GROUP)
    GUICtrlSetFont(-1, 13, 400, 0, "Arial Black")
    GUICtrlSetCursor(-1, 0)
    $Fertigkeit = GUICtrlCreateButton("Fertigkeit", 24, 184, 297, 65, $WS_GROUP)
    GUICtrlSetFont(-1, 13, 400, 0, "Arial Black")
    GUICtrlSetCursor(-1, 0)
    $RufBot = GUICtrlCreateButton("Ruf-Bot", 24, 256, 297, 65, $WS_GROUP)
    GUICtrlSetFont(-1, 13, 400, 0, "Arial Black")
    GUICtrlSetCursor(-1, 0)
    $GeradeauslaufBot = GUICtrlCreateButton("Geradeauslauf-Bot", 24, 328, 297, 65, $WS_GROUP)
    GUICtrlSetFont(-1, 13, 400, 0, "Arial Black")
    GUICtrlSetCursor(-1, 0)
    $ReinlogBot = GUICtrlCreateButton("Reinlog-Bot", 24, 400, 297, 65, $WS_GROUP)
    GUICtrlSetFont(-1, 13, 400, 0, "Arial Black")
    GUICtrlSetCursor(-1, 0)
    $HotkeyHelp = GUICtrlCreateLabel("Hotkeys: Strg+ A/B/C/D/E/F", 48, 504, 230, 28)
    GUICtrlSetFont(-1, 15, 400, 0, "Graphics")
    $TabSheet3 = GUICtrlCreateTabItem("TabSheet3")
    $TabSheet4 = GUICtrlCreateTabItem("TabSheet4")
    GUICtrlCreateTabItem("")
    GUISetState(@SW_SHOW)
    Dim $Form1_AccelTable[6][2] = [["^a", $PickUp],["^b", $AutoSchlag],["^c", $Fertigkeit],["^d", $RufBot],["^e", $GeradeauslaufBot],["^f", $ReinlogBot]]
    GUISetAccelerators($Form1_AccelTable)
    #EndRegion ### END Koda GUI section ###

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

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

    [/autoit]

    Mega