系统菜单自动生成popup菜单。。简单(分享＋送分)

2002-07-11 02:58:25 134 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

word2007插件开发经验备忘1--如何开发word插件最近做了word2007的插件开发（VBA开发）。虽然还没有完全写完，但是感觉有必要写一些东西了，于是就记录下来.... office的开发分为程序级开发和文档级开发，程序集开发的典型代表就是传说中的插件开发（AddIn）。具体如何在VS中建立word的插件就是.........（忽略啦...火星符号，点点点）主要是有一个ThisAddIn的类，这个类就代表了这个插件，主要的阅读详情

OnRButtonDown(UINT nFlags, CPoint point)
{
// TODO: Add your message handler code here and/or call default
CMenu *hMenu; // The handle to the main menu.
int nMenu; // The index of the menu item.
CMenu hMenuOurs; // The pop-up menu that we are creating.
UINT uMenuState; // The menu state.
CMenu *hSubMenu; // A submenu.
char szBuf[128]; // A buffer to store the menu string.
// Get the main menu.
CWnd *pWnd=AfxGetMainWnd();
hMenu =pWnd->GetMenu();
nMenu = 0;
// Create a pop-up menu.
hMenuOurs.CreatePopupMenu();
// have finished creating your pop-up menu.
uMenuState=hMenu->GetMenuState(nMenu,MF_BYPOSITION);
while ((uMenuState !=-1))
{
if (uMenuState != -1)
{
// Get the menu string.
hMenu->GetMenuString(nMenu, szBuf,128,MF_BYPOSITION);
uMenuState=hMenu->GetMenuState(nMenu,MF_BYPOSITION);
if ((LOBYTE(uMenuState) & MF_POPUP) && uMenuState!=0xFFFFFFFF) // Pop-up menu.
{
hSubMenu =hMenu->GetSubMenu(nMenu);
hMenuOurs.AppendMenu(LOBYTE(uMenuState),(UINT )hSubMenu->m_hMenu,szBuf);
}
else // Is a menu item, get the ID.
{
//nID = hMenu->GetMenuItemID(nMenu);
//hMenuOurs.AppendMenu(LOBYTE(uMenuState),nID,szBuf);

}
nMenu++; // Get the next item.
}
}
// TrackPopupMenu expects screen coordinates.
ClientToScreen(&point);
hMenuOurs.TrackPopupMenu(TPM_LEFTALIGN|TPM_RIGHTBUTTON,point.x,point.y,pWnd,NULL);

while (hMenuOurs.RemoveMenu(0,MF_BYPOSITION))
;
// Destroy the pop-up menu.
hMenuOurs.DestroyMenu();
}

...全文