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
去掉偏移