Как в коде получить ProjectNode проекта, в котором было вызвано контекстное меню?

[Ar]

Субж (см. вопрос).
SysContextMenu возвращает TreeNode из AOT, а нужен именно проект.

Можно идеологию, запрограммирую сам

[gl00mie]

Штатно, по-моему, никак - если только через Win32 API как-то шерстить окошки, из заголовка окна проекта получать его название и дальше искать по нему...

[Ar]

Тоже склоняюсь к такому варианту... Если никто не подскажет иного, так и сделаю.

[Ar]

Пока не нашёл ничего лучшего, как перебрать все окна текущего Workspace'а. Первым попавшимся проектным окном и будет верхнее в Z-последовательности окно.

    HWND        hWndParent = WinAPI::findWindowEx(infolog.hWnd(), 0, 'MDIClient', '');
    HWND        hWnd;
    str         caption;
    str         projName;
    ;

    // активные/открытые проекты
    for (hWnd = WinAPI::findWindowEx(hWndParent, 0, 'AxMDIChildWindow', '');
         hWnd;
         hWnd = WinAPI::findWindowEx(hWndParent, hWnd, 'AxMDIChildWindow', ''))
    {
        caption = WinAPI::getWindowText(hWnd);
        if (strStartsWith(caption, "@SYS4534"))
        {
            projName = strDel(caption, 1, strLen("@SYS4534") + 1);
            //WinAPI::flashWindowEx(hWnd, 1, 5, 200);
            break;
        }
    }

Для своих целей я не ограничиваюсь первым найденным проектом, а ищу их все, заполняю в ComboBox, делаю верхний проект выбранным в ComboBox'е, а затем предлагаю юзеру самому выбрать проект:

    for (hWnd = WinAPI::findWindowEx(hWndParent, 0, 'AxMDIChildWindow', '');
         hWnd;
         hWnd = WinAPI::findWindowEx(hWndParent, hWnd, 'AxMDIChildWindow', ''))
    {
        caption = WinAPI::getWindowText(hWnd);
        if (strStartsWith(caption, "@SYS4534"))
            Projects.add(strDel(caption, 1, strLen("@SYS4534") + 1));
    }
    Projects.selection(0);