Правая кнопка мыши

← →
Evgeny78 (2004-01-30 13:05) [0]

Как можно обработать клик правой кнопки мыши на форме?

← →
Zergling © (2004-01-30 13:08) [1]

OnMouse... (какой понравится)

← →
8ung © (2004-01-30 13:17) [2]

Немного "разжую" ответ Zergling.

Есть такие обработчики события(у формы) OnMouseDown,OnMouseUp.
OnMouseDown - когда кнопку нажали.
OnMouseUp - когда кнопку отпустили.
Пример:

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin If Button = mbRight then Close;//если нажата правая кнопка, то... end;

← →
тихий вовочка (2004-01-30 18:00) [3]

Но приятней OnMouseUp, потому как пользователь должен иметь право нажать кнопку, подумать, а потом оттащив мышь отпустить и ничего за это не схлопотать. Т.е. если ты нажал на кнопку, а потом, удерживая ее ,передумал, у тебя есть возможность отвести мышь от кнопки и тогда клик не сработает. Дай пользователю шанс

> Дай пользователю шанс

вспомнить свой нецензурный словарный запас :)))

← →
@Good.exe (2004-01-30 18:25) [5]

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin if button=mbRight then ... end;

Правая кнопка мыши Найти похожие ветки