mshflexgrid控件右键弹出菜单有关问题，

mshflexgrid控件右键弹出菜单问题，高手请进！！
我的这段弹出菜单的程序，在右击mshflexgrid中的纪录时，弹出菜单总是出现在屏幕的下方，只有在单击第一条纪录的时候才在出现在鼠标的旁边，而且也不变亮。
请各位大哥应该怎样让弹出菜单出现在鼠标旁边，并且可以在右键单击的时候变亮。

程序如下：


Private   Sub   dataGrid1_MouseDown(Button   As   Integer,   Shift   As   Integer,   x   As   Single,   y   As   Single)
gengx   =   dataGrid1.TextMatrix(dataGrid1.RowSel,   1)
Label3   =   gengx

If   Button   =   2   Then
datashow.PopupMenu   popm,   0,   x   +   3,   y

End   If
End   Sub

[解决办法]
datashow.PopupMenu popm
去掉偏移