Текущий архив: 2004.02.10;
Скачать: 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 вся ветка
Текущий архив: 2004.02.10;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.019 c
