Скачать: CL | DM;

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

← →
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, потому как пользователь должен иметь право нажать кнопку, подумать, а потом оттащив мышь отпустить и ничего за это не схлопотать. Т.е. если ты нажал на кнопку, а потом, удерживая ее ,передумал, у тебя есть возможность отвести мышь от кнопки и тогда клик не сработает. Дай пользователю шанс

---

← →
Тимохов ©   (2004-01-30 18:04) [4]

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

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

---

← →
@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;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c