- Код: Выделить всё
Public Sub SetParentWnd(ByVal hWndChild As Long, ByVal HWndParent As Long)
SetParent hWndChild, HWndParent
SetWindowLong hWndChild, GWL_STYLE, _
GetWindowLong(hWndChild, GWL_STYLE) Or WS_CHILD
End Sub
Такая форма нормально выполняет метод Popupmenu.
Если теперь из такой загруженной формы выполнить показ модальной формы Form1.Show vbModal, me, то здесь метод Popupmenu не выполняется. Подозреваю, что проблема кроется где-то в свойствах родительской формы, которая была приаттачена не ср-вами родного вазика. Кто нибудь знает, в чем может быть загвоздка???