Applescript cách mở cửa sổ mạng của Cài đặt Audio MIDI

Tôi đang cố gắng viết một Applescript để tạo kết nối âm thanh mạng bằng Cài đặt MIDI âm thanh ( / Ứng dụng / Tiện ích / Cài đặt MIDI âm thanh.app ). Tôi không thể mở cửa sổ Cài đặt mạng . Dường như có một hình ảnh mà tôi phải thực hiện nhấp chuột để mở Cửa sổ mạng.

Đây là những gì tôi đã thử:

    tell application "System Events"
        tell process "Audio MIDI Setup"
            set {xPos, yPos} to position of image 1 of group 1 of scroll area 1 of window "MIDI Studio"
        end tell
    end tell

    tell me to do shell script "/usr/bin/cliclick c:" & xPos & "," & yPos
    click at {xPos, yPos} --image "Network" of group 1 of scroll area 1 of window "MIDI Studio"
    delay 0.1
    --click image "Network" of group 1 of scroll area 1 of window "MIDI Studio"

Bạn nói đúng rằng hình ảnh bạn đề cập có hành động AppleScript được liên kết với hình ảnh được cho là mở cửa sổ Cài đặt Mạng MIDI , nhưng thực tế, nó không làm gì cả.

Do đó, như một cách giải quyết, để mở cửa sổ Cài đặt Mạng MIDI , hãy thử điều này:

    tell application "Audio MIDI Setup" to activate

    tell application "System Events" to tell process "Audio MIDI Setup" 
        (******************Variable declarations for GUI objects*******************)
        set _W to a reference to (every window whose ¬
            description contains "floating window" and ¬
            name is not "MIDI Network Setup")
        set select_all_menu_item to ¬
            a reference to menu item "Select All" of ¬
                menu 1 of ¬
                menu bar item "Edit" of ¬
                menu bar 1
        set show_midi_studio_menu_item to ¬
            a reference to menu item "Show MIDI Studio" of ¬
                menu 1 of ¬
                menu bar item "Window" of ¬
                menu bar 1
        set midi_studio_window to a reference to window "MIDI Studio"
        set midi_studio_toolbar to a reference to toolbar 1 of midi_studio_window
        set midi_studio_images to a reference to images of ¬
            group 1 of ¬
            scroll area 1 of ¬
            midi_studio_window
        set show_info_button to a reference to (the first button of ¬
            midi_studio_toolbar whose description is "Show Info")
        (**********************End of variable declarations************************)

        if not (midi_studio_window exists) then click show_midi_studio_menu_item
        tell midi_studio_window to perform action "AXRaise" -- bring window to front

        if the front window is midi_studio_window then
            tell select_all_menu_item to if it exists then click it
            --OR: keystroke "a" using command down

            if the show_info_button is enabled then
                click the show_info_button
                click (every button of _W whose subrole is "AXCloseButton")

                tell window "MIDI Network Setup" to perform action "AXRaise"
            end if
        end if
    end tell

Nếu bạn có bất kỳ vấn đề nào với điều này, hãy để lại nhận xét và tôi sẽ liên lạc lại với bạn. Mặt khác, hãy cân nhắc lựa chọn câu trả lời này để giúp hướng dẫn những người dùng khác biết họ sẽ gặp phải vấn đề tương tự.

Tôi không thể làm cho tập lệnh của bạn hoạt động, nó không mở cửa sổ "Thiết lập mạng MIDI" và tôi phải thay đổi "mô tả" thành "tiêu đề" trong dòng sau đây đặt show_info_button thành tham chiếu đến (nút đầu tiên của midi_studio_toolbar có mô tả là "Hiển thị thông tin")

Tập lệnh này đang thực hiện công việc cho ứng dụng "Cài đặt MIDI âm thanh" để kích hoạt ứng dụng nói cho ứng dụng "Sự kiện hệ thống" cho quá trình "Cài đặt MIDI âm thanh" cho mục menu 2 của menu 1 của mục thanh menu "Cửa sổ" của thanh menu 1

        if name is "Show MIDI Studio" then click

    end tell
end tell
tell process "Audio MIDI Setup"
    set {xPos, yPos} to position of image "Network (Online)" of group 1 of  scroll area 1 of window "MIDI Studio"
    do shell script "/usr/local/bin/cliclick  dc:" & xPos & "," & yPos & ""
end tell

kết thúc nói với ứng dụng "Thiết lập âm thanh MIDI" để thoát