Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: MS ACCESS

Вопросы связанные с MS ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: Двойное нажатие правой мышь по ListView
 
 автор: Tip   (07.09.2006 в 00:00)
 
 

Хочу что бы по двойному нажатию правой мышь открывалась форма.
Какое собыытие?
Сейчас у меня так, что жутко не удобно!
Private Sub ListView_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Long, ByVal Y As Long)
Me.SetFocus
If (Button And acRightButton) > 0 Then
On Error Resume Next
DoCmd.OpenForm "Редактирование", , , "[Код]=" & Me.lvDocList.SelectedItem.Tag, , acDialog, "VIEW"
End If
End Sub

  Ответить  
 
 автор: osmor   (07.09.2006 в 00:00)
 
 

есть еще DblClick но он не различает кнопки, т.е на MouseDown проверяете какая кнопка, а на DblClick - действие.
IMHO - не удачное решение, поперек привычных действий ( я бы ни за что не догадался), значительно логичнее открывать при левом DblClick
к тому же это лишит вас возможности сделать контекстное меню

  Ответить  
 
 автор: Tip   (07.09.2006 в 00:00)
 
 

Osmor так что мне сделать? Что бы по двойному нажатию по ЛистВью открыть форму. Контекст не нужен!

  Ответить  
 
 автор: osmor   (07.09.2006 в 00:00)
 
 

я же написал, на событие MouseDown проверяете какая кнопка, а на DblClick открываете форму примерно так:
на уровне формы переменная :
dim bRightMouseDown as boolean

на событие MouseDown :
bRightMouseDown = (Button And acRightButton)

На событие DblClick
if bRightMouseDown then docmd.openform ......

  Ответить  
 
 автор: Tip   (08.09.2006 в 00:00)
 
 

ой точно простите!

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList