IContextMenu::QueryContextMenu 返回不相关的菜单

IContextMenu::QueryContextMenu return not relevant menu

本文关键字：菜单 不相关 返回 QueryContextMenu IContextMenu      更新时间：2023-10-16

网络连接快捷方式（以太网、Wi-Fi 等）根据连接状态（已连接/断开连接）具有不同的上下文菜单。我使用以下代码（Delphi）来检索和显示此菜单。

var pidl, child: PItemIdList;
    pFolder: IShellFolder;
    pMenu: IContextMenu;
    menu: HMENU;
begin
  SHParseDisplayName(PChar('%USERPROFILE%Desktopeth0.lnk'), nil, pidl, 0, PDWORD(nil)^);
  SHBindToParent(pidl, IID_IShellFolder, Pointer(pFolder), child);
  CoTaskMemFree(pidl);
  pFolder.GetUIObjectOf(0, 1, child, IID_IContextMenu, nil, pMenu);
  menu := CreatePopupMenu;
  pMenu.QueryContextMenu(menu, 0, 0, $7fff, CMF_NORMAL);
  TrackPopupMenuEx(menu, TPM_LEFTBUTTON, 0, 0, Handle, nil);
  DestroyMenu(menu);
end;

但是在更改连接状态后，我不断获得旧菜单。重新启动应用程序后，我有时会得到正确的菜单，但是，大多数时候我没有。

为什么会发生这种情况以及如何解决？

操作系统：32 位和 64 位 Windows 7/8/10

C++代码：

PIDLIST_ABSOLUTE pidl;
if SUCCEEDED(SHParseDisplayName(L"%USERPROFILE%\Desktop\eth0.lnk", NULL, &pidl, 0, NULL))
{
  PCUITEMID_CHILD child;
  CComQIPtr<IShellFolder> pFolder;
  if SUCCEEDED(SHBindToParent(pidl, IID_IShellFolder, (void**)&pFolder, &child))
  {
    CComQIPtr<IContextMenu> pMenu;
    if SUCCEEDED(pFolder->GetUIObjectOf(0, 1, &child, IID_IContextMenu, NULL, (void**)&pMenu))
    {
      HMENU menu = CreatePopupMenu();
      if SUCCEEDED(pMenu->QueryContextMenu(menu, 0, 0, 0x7fff, CMF_NORMAL))
        TrackPopupMenuEx(menu, TPM_LEFTBUTTON, 0, 0, hWnd, NULL);
      DestroyMenu(menu);
    }
  }
  CoTaskMemFree(pidl);
}

加：也许是Windows错误。来自互联网和文件管理器（如资源管理器（XYPlorer，Explorer++等）的任何示例都有相同的问题。现在我在Windows 10资源管理器上看到了同样的问题。如果您通过拖放从桌面上的"控制面板\所有控制面板项\网络和共享中心\更改适配器设置\adapter_name"创建网络连接的快捷方式，您将看到相同的问题。

我认为该问题与正在缓存的网络连接快捷方式的上下文菜单信息有关，当您更改连接状态时，窗口可能不会自动刷新缓存的信息。

您可能需要通过调用函数 SHChangeNotify 来手动刷新缓存，它将通知系统应用程序已执行的事件并触发缓存刷新。
这是德尔福的一个例子：

begin
// ... your code here ...
SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, nil, nil);
end;

在C++：

SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, NULL, NULL);

若要确保上下文菜单是最新的，请尝试在显示之前调用SHChangeNotify。

相关文章：