ник: KrukVN
Совершенно невменяемая ситуация :)
сталкивался (только если форма подчиненная). выкрутился как-то так:
'Обход глюка при выборе команды из контекстного меню
'Если эта форма подчиненная, то вызов функции должен происходить примерно так:
'=Screen.ActiveForm.frm_MGrFind.Form.NewRecMnu
'Но в этом случае происходит ДВойное ее срабатывание. Кроме того, этой функции невозможно
'передать какой-либо параметр (из контекстного меню) - виснет Access :/
Function NewRecMnu()
Static dblEvent As Boolean
If dblEvent = False Then
Call NewRec(True)
End If
dblEvent = Not dblEvent
End Function
|
криво/хреново. но вроде работает... и забил на этом :/