Kontextmenü am Mauszeiger ausrichten

Rubens

Bekomme Kontextmenu nicht an Mauszeiger heran.
Kann jemand vielleicht helfen?

void CMenuDlg::OnContextMenu(CWnd* pWnd, CPoint point)
{
// TODO: Add your message handler code here

//Lokale Variablen deklarieren
CMenu *m_lMenu; //zeiger auf Menü
CPoint m_pPoint; //Kopie der Mausposition

//Mausposition in lokale Variable kopieren
m_pPoint = point;
//Position in Bildschirmkoordinaten konvertieren
ClientToScreen(&m_pPoint);
//Zeiger auf Fenstermenü holen
m_lMenu = GetMenu();
//Zeiger auf erstes Untermenü holen
m_lMenu = m_lMenu->GetSubMenu(0);
//Popup-Menü anzeigen
m_lMenu->TrackPopupMenu(TPM_CENTERALIGN + TPM_RIGHTBUTTON,
m_pPoint.x, m_pPoint.y, this, NULL);

}