[решено] работа с контекстым меню - Компьютерный форум OSzone.net

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- AutoIt (http://forum.oszone.net/forumdisplay.php?f=103)

- - [решено] работа с контекстым меню (http://forum.oszone.net/showthread.php?t=176551)

работа с контекстым меню

Всем привет! кто-нибудь знает, как с помощью AutoIt можно управлять контекстным меню (обычно это окна типа: [Class: #32768]). в частности интересует возможность управлять менюшками, которые появляютя, если кликнуть правой кнопкой мыши по какой-нить иконке в трее.

alexey_a,
Попробуйте так. Вместо "AdMunch.exe" поставьте нужную Вам Программу. Если раскомментировать последние строки в функции, то у меня закрывает Ad Muncher.

Код:

#NoTrayIcon

#include <SysTray_UDF.au3>



$Pid = ProcessExists("AdMunch.exe")



If Not $Pid Then

    Exit

EndIf

Local $Old_Mouse_Pos = MouseGetPos()

MouseMove(@DesktopWidth / 2, @DesktopHeight, 0)

$Index = _SysTrayIconIndex($Pid)

If @error Then

    Exit

EndIf



_SysTrayIconClick($Index, "Right")



Func _SysTrayIconClick($iIndex, $sButton = "Main")

    Local $TrayIcon_Pos = _SysTrayIconPos($iIndex)

    If Not IsArray($TrayIcon_Pos) Then Return SetError(1, 0, 0)

    MouseClick($sButton, $TrayIcon_Pos[0], $TrayIcon_Pos[1], 1, 0)

    ;MouseClick("left", $TrayIcon_Pos[0] - 15, $TrayIcon_Pos[1] - 15, 1, 0)

    ;MouseMove($Old_Mouse_Pos[0], $Old_Mouse_Pos[1], 0)

EndFunc   ;==>_SysTrayIconClick

SysTray_UDF

Спасибо, madmasles!
я тут написал немного другую функцию. она мне больше подходит, так как менюшки, с которыми я работаю, периодически меняются (количество пунктов меню, очередность). поэтому после каждого изменения для каждого пункта в меню измерять его положение относительно окошка, мне не очень хочется. вот код функции:

Код:



; #Функция# -----------------------------------------------------------------------------------------------------------------------------

; Имя....................: SelectItemFromMonitorMenu

; Описание ..............: Выбирает пункт контекстного меню для иконки вашего приложения в трее 

; Параметры .............: $item - текст пункта меню (например: "Exit")

; Возвращаемые значения .: Успешно      - 1

;                          Ошибка       - 0

; Заметки ...............: $your_applications_window_title - title окошка вашего приложения, которое отображается в трее. 

;                                Вы можете его увидеть в секции ToolsBar в AutoIt Window Info, если наведете на курсор на иконку в трее.

; -----------------------------------------------------------------------------------------------------------------------------------------

#Include <GuiToolBar.au3>

#include <GuiMenu.au3>



Func SelectItemFromMonitorMenu($item)

        Opt("MouseCoordMode", 1)

        $ind = 0

        $hWnd = ControlGetHandle("[CLASS:Shell_TrayWnd]","","[CLASS:ToolbarWindow32; TEXT:Notification Area]")

        if $hWnd = "" Then

                ConsoleWrite("Can't get hwnd of bottom toolbar.")

                Return 0

        EndIf

        

        $tray_icon_count = _GUICtrlToolbar_ButtonCount($hWnd)

        

        For $i = 0 to $tray_icon_count

                $command_id = _GUICtrlToolbar_IndexToCommand($hWnd, $i)

                $text = _GUICtrlToolbar_GetButtonText($hWnd, $command_id)

                if StringInStr($text,$your_applications_window_title) = 0 Then

                        ContinueLoop

                Else

                        $index = $i

                        ExitLoop

                EndIf

        Next

        

        _GUICtrlToolbar_ClickIndex($hWnd, $index, "right") 

        Sleep(100)

        

        $cur_pos = MouseGetPos()

        if IsArray($cur_pos) = 0 Then

                ConsoleWrite("Can't get position of current mouse coordinate")

                Return 0

        EndIf



        if WinExists("[Class:#32768]") = 0 Then

                ConsoleWrite("Context menu is not appeared for tray icon.")

                Return 0

        Else

                $h_win = WinGetHandle("[Class:#32768]")

                if $h_win = "" Then

                        ConsoleWrite("Can't get hwnd for application's context menu window.")

                        Return 0

                EndIf

        

                $hMenu = _SendMessage($h_win, $MN_GETHMENU,0,0)

                

                $it_index = _GUICtrlMenu_FindItem($hMenu, $item,True)

                if $it_index = -1 Then

                        ConsoleWrite("Can't find item " & $item & " in the application's context menu window.", $fail)

                        Return 0

                EndIf

                

                $it_pos = _GUICtrlMenu_GetItemRect($h_win, $hMenu, $it_index)

                if IsArray($it_pos) = 0 Then

                        ConsoleWrite("Can't get position of item " & $item & " in the application's context menu window.", $fail)

                        Return 0

                EndIf

                

                MouseClick("left", $it_pos[0] + ($it_pos[2]-$it_pos[0])/2, $it_pos[1] + ($it_pos[3]-$it_pos[1])/2)

        EndIf

        

    MouseMove($cur_pos[0], $cur_pos[1])

        Return 1

EndFunc

alexey_a,
У меня не работает, ругается на необъявленную переменную $your_applications_window_title, и не понял, откуда $MN_GETHMENU и $fail.

там же вверху написано, что:
$your_applications_window_title - title окошка вашего приложения, которое отображается в трее. Вы можете его увидеть в секции ToolsBar в AutoIt Window Info.
$MN_GETHMENU - это стандартная константа, объявленная в ...\AutoIt3\include\WindowsConstants.au3
$fail надо удалить и запятую, которая стоит перед ним. то есть заменить
ConsoleWrite("Can't find item " & $item & " in the application's context menu window.", $fail)
на
ConsoleWrite("Can't find item " & $item & " in the application's context menu window.").

Это моя ошибка. просто у меня в скриптах я использую свою функцию для логирования, а не ConsoleWrite. и так получилось,что переделывая скрипт для того, чтобы разместить на форуме, я заменял мою функцию на ConsoleWrite. и для одно замены сделал это неправильно, забыл удалить второй параметр $fail.

Цитата:

Цитата alexey_a

вот код функции: »

не понял как ей пользоваться ?
не находит приложение
в строчке :

Цитата:

Цитата alexey_a

ControlGetHandle("[CLASS:Shell_TrayWnd]","","[CLASS:ToolbarWindow32; TEXT:Notification Area]") »

менял "TEXT:Notification Area" на что попало и включал мозг,а потом снова отключал входил в нирвану но никак.