Параметры событий мыши
Таблица 13.5. Параметры событий мыши
| Параметр |
Значение |
| Sender |
Имя объекта, над которым произошло событие мыши |
| Button |
Указывает, какая из трех кнопок мыши нажата. Может принимать значения: mbLeft — левая; mbMiddle — средняя и mbRight — правая |
| Shift |
Показывает состояние кнопок <Alt>, <Ctrl> и <Shift> во время наступления события мыши |
| X, Y |
Координаты клиентской части компонента, над которым произошло событие мыши |
Обработка события OnMouseDown
Всякий раз, когда пользователь нажимает любую кнопку мыши, происходит событие OnMouseDown. Для использования этого события вам нужно написать обработчик события у желаемого компонента. Например, если вы хотите обработать событие OnMouseDown, когда пользователь нажмет кнопку мыши над формой Form1, нужно в окне инспектора объектов на вкладке Events найти событие OnMouseDown для формы Form1 и дважды щелкнуть на нем. В результате Kylix создаст заготовку обработчика события нажатия кнопки мыши для формы (листинг 13.24).
Листнг 13.24.Заготовка обработчика события OnMouseDown
procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
end;
Приведем пример обработки данного события (листинг 13.25). Запустите названную программу. При каждом щелчке в области формы вы увидите надпись "Здесь!" на месте, где вы щелкнули мышью (Рисунок 13.7).
Лизинг 13.25.Пример обработки события OnMouseDown
Shift: TShiftState; X, Y: Integer);
begin
Canvas.TextOut (X, Y, 'Здесь!'); { печатает текст на канве }
end;
