Показать сообщение отдельно
  #1  
Старый 11.08.2012, 02:22
Аватар для Alegun
Alegun Alegun вне форума
LMD-DML
 
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
По умолчанию Управление состоянием кнопки

Помогите пожалуйста!
Имею кнопку (точнее она меня:-) у которой два положения: первое ненажатое по дефолту, второе – нажатое залипшее. Так она задумана, залипает она по двойному клику мышкой, при одинарном работат как обычная кнопка.

Так вот вопрос: как сделать чтобы она работала на туклик также как и на два одинарных. И не залипала.

Короче говоря, с горя написал:

Код:
Private Sub CommandButton30_DblClick(Cancel As MSForms.ReturnBoolean)
Dim KeyAscii As Integer
SendKeys "{left}" 
SendKeys "{right}"  “ и энто только для того, чтоб вернуть фокус на место, маразм крепчал!
End Sub

Вроде так работает, но это бред же какой-то! Если рядом добавить например

Код:
Private Sub Command30_Click()
‘///////////////////
End Sub

то уже не работает. Поправьте пжлст, наверняка ведь кто-то знает как это сделать правильно.
Заранее спасибо!

З.Ы. Где то читал, что это глюк виджл бейсика, но мне от этого не легче:-(
Ответить с цитированием