Параметры событий мыши



Таблица 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

procedure TForm1. FormMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
Canvas.TextOut (X, Y, 'Здесь!'); { печатает текст на канве }
end;

Содержание раздела