Разделы инструкций

В сети

Пользователей: 111
Из них просматривают:
Аналоги: 30. Видео: 3. Даташиты: 19. Инструкции: 11. Магазин: 1. Новости: 18. Остальное: 8. Программы: 2. Производители: 3. Профиль пользователя: 3. Расчёты: 1. Торрент: 1. Форум: 9. Чат: 2.
Участников: 4
Гостей: 107

an , Google , wolf170571 , Яндекс , далее...
Рекорд 2375 человек онлайн установлен 26.12.2015.

Партнёры


Партнёры

Новые объявления

Оглавление

События OnMouseDown и OnMouseUp

Событие OnMouseDown наступает в момент нажатия пользователем кнопки мыши над компонентом. Имеется также парное к нему событие OnMouseUp, наступающее при отпускании нажатой кнопки мыши над объектом.

 

Обработка событий OnMouseDown и OnMouseUp используется для операций, требуемых при нажатии и отпускании пользователем какой-либо кнопки мыши. Обработчики этих событий имеют параметры Sender, Shift, Button, X и Y. С первыми двумя параметрами мы уже знакомы из описания предыдущих событий. Значения параметра Button определяют, какая кнопка мыши нажата: mbLeft — левая, mbRight — правая, mbMiddle — средняя. Параметры X и Y определяют координаты указателя мыши в клиентской области компонента.
Создайте новое приложение и поместите на его форму два компонента Label. Для формы Form1 создайте обработчик события OnMouseDown и введите в него следующие строки программного кода из листинга 22.5.

 

Листинг 22.5. Обработчик события OnMouseDown

 

if(Button == mbLeft) Labell->Caption = "Нажата левая кнопка мыши";

if(Button == mbRight) Labell->Caption = "Нажата правая кнопка мыши";

if(Button == mbMiddle) Labell->Caption = "Нажата средняя кнопка мыши";

Label2->Caption = "Координаты мыши: X="+String(X)+" Y="+String(Y);

 

Запустите приложение и пощелкайте разными кнопками мыши на его форме. Вы увидите сообщения программы о ваших действиях и координаты курсора мыши.

Комментарии принадлежат их авторам. Мы не несем ответственности за их содержание.
Отправитель Нити

Разное

Если "ревёт" один из дросселей резонансного стабилизатора, забейте деревянный клин между его катушками.

Интересно

Можно использовать оплетку телевизионного кабеля абонентского подключения ТВ в многоэтажных домах для заземления.

Похожие инструкции