Инструкции

Справочный раздел

В этом разделе Вы найдетё инструкции, справочники, и всевозможные хелпы по использованию программного обеспечения.

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

В сети

Пользователей: 325
Из них просматривают:
Аналоги: 121. Видео: 2. Галерея: 1. Даташиты: 105. Инструкции: 2. Кроссворд: 1. Новости: 20. Остальное: 6. Программы: 5. Профиль пользователя: 3. Расчёты: 1. Торрент: 2. Форум: 56.
Участников: 2
Гостей: 323

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);

 

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

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

Разное

Интересно

Щуп станет универсальным, если с обратной стороны его на коротком проводе припаять"крокодил" в резиновом чехле.

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