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

В сети

Пользователей: 129
Из них просматривают:
Аналоги: 49. Даташиты: 27. Инструкции: 4. Новости: 16. Остальное: 5. Партнёры: 1. Программы: 2. Производители: 4. Расчёты: 1. Теги: 1. Торрент: 2. Форум: 14. Чат: 3.
Участников: 5
Гостей: 124

an , KT315 , 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);

 

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

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

Разное

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

Интересно

При первом включении после ремонта (для двухтактных УНЧ):
1. в разрыв "+" и "_" резисторы около 100 Ом для ограничения тока в случае не полного устранения неисправности.

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