Click & DblClick

[Константиин]

Кидаю на форму Label и пишу код:

Код: Выделить всё

Private Sub Label1_Click()
Label1.Caption = "skgbskghg"
End Sub

Private Sub Label1_DblClick()
MsgBox "sakh"
End Sub


Кликаю два раза, и в результате выполняются оба действия.

Толи я дурак,
Толи на VB косяк???

Почему не выполняется только действие двойного щелчка???

[Хакер]

Когда происходит первый щелчок, происходит событие Click. Потом проходит дофига (для компьютера) времени, и ты совершаешь второй щелчок. Компьютер сравнивает время между этими двумя щелчками, и если оно не больше определённого в Панели управления, то считается, что произошёл даблклик.

Внимание вопрос: откуда, по твоему, сразу же после первого щелчка компьютер може знать, кликнешь ты второй раз (т.е. подождать и не вызывать событие Click, чтобы потом вызвать DblClick), или не кликнешь?

[Константиин]

Тогда как можго реализовать разные действия при одном и двух кликах???

[Хакер]

Смотря какие действия. Если совершенно разные, то такого делать нельзя (принципиально). Если действия "комплиментарные" (например клик - "выделение", даблклик - "запуск") то тебе никто не мешает делать это при тех обстоятельствах, которые тебе открылись сейчас и вызвали у тебя недовольство.

[Константиин]

Всё, потребность в этом отпадает. Я перестроил программу.
Но спасибо за ответ!!!