Windows TABs mit AutoIt steuren

  • Hallo ich weiss das man eine Combo box mit ControlCommand steuern kann.

    [autoit]

    ControlCommand("Installer Language", "Please select a language", "ComboBox1", "SelectString", "Deutsch")

    [/autoit]

    Wie funktioniert das aber bei Windows Tabs (aber nicht mit Send TAB)
    Mit den Autoit Windows Info habe ich herausgefunden das die Class z.b. SysTabControl heisst. Wie kann ich das steuern ?

    ----------------------------------------------------------------------------------------------------------------------
    Früher musste man Drachen töten und konnte die Jungfrau heiraten.
    Heute gibt es keine Jungfrauen mehr, man muss den Drachen heiraten!

    • Offizieller Beitrag
    [autoit]

    #include <GuiTab.au3>

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

    $hWnd_Tab = ControlGetHandle("My ", "", "SysTabControl321")
    _GUICtrlTab_SwitchNext($hWnd_Tab)

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

    Func _GUICtrlTab_SwitchNext($hWnd)
    Local $iItems_Count = _GUICtrlTab_GetItemCount($hWnd)
    Local $iCurrent_TabIndex = _GUICtrlTab_GetCurSel($hWnd)
    Local $iNext_TabIndex = $iCurrent_TabIndex

    Switch $iCurrent_TabIndex
    Case 0 To $iItems_Count-2
    $iNext_TabIndex += 1
    Case Else
    $iNext_TabIndex = 0
    EndSwitch

    _GUICtrlTab_SetCurSel($hWnd, $iNext_TabIndex)
    EndFunc

    [/autoit]

    Mega

  • Danke für deine Antwort.
    ich wollte damit nach dem 7zip installiert wurde in den Reiter Einstellungen springen.
    Und dort die Optionen verstellen.
    Nur leider funktioniert das noch nicht direkt.

    [autoit]


    #include <GuiTab.au3>
    run (@ProgramFilesDir & "\7-Zip\7zFM.exe")

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

    WinWait("7-Zip Dateimanager")
    If Not WinActive("7-Zip Dateimanager") Then WinActivate("7-Zip Dateimanager")
    Send("{ALTDOWN}eo{ALTUP}")
    WinWaitActive("Optionen")

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

    $hWnd_Tab = ControlGetHandle("Plugins", "", "SysTabControl321")
    _GUICtrlTab_SwitchNext($hWnd_Tab)

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

    Func _GUICtrlTab_SwitchNext($hWnd)
    Local $iItems_Count = _GUICtrlTab_GetItemCount($hWnd)
    Local $iCurrent_TabIndex = _GUICtrlTab_GetCurSel($hWnd)
    Local $iNext_TabIndex = $iCurrent_TabIndex

    Switch $iCurrent_TabIndex
    Case 0 To $iItems_Count-2
    $iNext_TabIndex += 1
    Case Else
    $iNext_TabIndex = 0
    EndSwitch

    _GUICtrlTab_SetCurSel($hWnd, $iNext_TabIndex)
    EndFunc

    [/autoit]

    Funktioniert nur wenn ich mit ControlCommand jeden Tab einzeln aufrufe.

    [autoit]

    run (@ProgramFilesDir & "\7-Zip\7zFM.exe")

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

    WinWait("7-Zip Dateimanager")
    If Not WinActive("7-Zip Dateimanager") Then WinActivate("7-Zip Dateimanager")
    Send("{ALTDOWN}eo{ALTUP}")
    WinWaitActive("Optionen")
    ControlCommand ("Optionen", "System", "SysTabControl321", "TabRight", "")
    ControlCommand ("Optionen", "Plugins", "SysTabControl321", "TabRight", "")
    ControlCommand ("Optionen", "Editor", "SysTabControl321", "TabRight", "")

    [/autoit]

    Vielen Dank

    ----------------------------------------------------------------------------------------------------------------------
    Früher musste man Drachen töten und konnte die Jungfrau heiraten.
    Heute gibt es keine Jungfrauen mehr, man muss den Drachen heiraten!

  • Danke, habs leider nicht gecheckt.

    Habe aber meine eigene Lösung gefunden, um bei 7zip nach der Installation die Einstellungen zu Ändern.
    Nur die auswahle der Dateiverknüpfungen mit Autoit weiss ich noch nicht (7z, rar, zip, arj,...)

    Hier mal mein Script

    [autoit]

    run (@ProgramFilesDir & "\7-Zip\7zFM.exe")

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

    WinWait("7-Zip Dateimanager")
    If Not WinActive("7-Zip Dateimanager") Then WinActivate("7-Zip Dateimanager")
    Send("{ALTDOWN}eo{ALTUP}")
    WinWaitActive("Optionen")
    ; ControlListView ("Optionen", "", "SysListView321", "Select", 1, 9)
    ControlCommand ("Optionen", "System", "SysTabControl321", "TabRight", "")
    ControlClick ("Optionen", "Optionen...", "Button1")
    WinWaitActive("7-Zip Einstellungen")
    ControlCommand ("7-Zip Einstellungen", "7-Zip in Kontextmenü integrieren", "Button1", "Check")
    ControlCommand ("7-Zip Einstellungen", "Kontextmenü kaskadieren", "Button2", "Check")
    ControlClick ("7-Zip Einstellungen", "OK", "Button3")
    WinWaitActive("Optionen")
    ControlCommand ("Optionen", "Plugins", "SysTabControl321", "TabRight", "")
    ControlSetText("Optionen","","Edit1", @WindowsDir & "\notepad.exe")
    ControlCommand ("Optionen", "Editor", "SysTabControl321", "TabRight", "")
    ControlCommand ("Optionen", "Symbole aus &Dateien laden und anzeigen", "Button2", "Check")
    ControlCommand ("Optionen", "System-Kontext&menü im Dateimenü anzeigen", "Button3", "Check")
    ControlCommand ("Optionen", "Dateiauswahl markiert ganze &Zeile", "Button4", "Check")
    ControlCommand ("Optionen", "Settings", "SysTabControl321", "TabRight", "")
    ControlCommand ("Optionen", "", "ComboBox1", "SelectString", "German (Deutsch)")

    [/autoit]

    ----------------------------------------------------------------------------------------------------------------------
    Früher musste man Drachen töten und konnte die Jungfrau heiraten.
    Heute gibt es keine Jungfrauen mehr, man muss den Drachen heiraten!