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

В сети

Пользователей: 78
Из них просматривают:
Аналоги: 27. Даташиты: 10. Инструкции: 6. Новости: 16. Обзор: 1. Остальное: 2. Программы: 4. Профиль пользователя: 1. Расчёты: 1. Теги: 1. Торрент: 1. Форум: 6. Чат: 2.
Участников: 4
Гостей: 74

an , alex01981 , Google , Яндекс , далее...
Рекорд 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);

 

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

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

Разное

При замене электролитических конденсаторов, кроме соблюдения полярности, не следует значительно превышать допустимое рабочее напряжение.

Интересно

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

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