Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: kot_k_k тип переменной не задавал, стоит в самом начале обработки NodeClick, -> показываем меню -> выход из обработки. вот этими двумя процедурами обрабатываем нажатие мыша на дереве.
Private Sub TreeView0_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Long, ByVal Y As Long) If Button And acRightButton Then bRightMouseDown = True Else bRightMouseDown = False End If End Sub Private Sub TreeView0_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Long, ByVal Y As Long) bRightMouseDown = False End Sub
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.