![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
События мышки
BAngel © (2006-05-08 13:37:00)Помогите пожалуйста разобраться. Мне нужно что бы прога распознавала когда я на картинке нажимая ЛКМ, а когда ПКМ
Мефисто (2006-05-08 22:37:00) [1]>> А как эту процедуру вызывать. Она почему то не ставится в Object Inspector на OnMouseDown
Ее не вставляют. В обработчике компонента OnMouseDown пищем
case Button of
mbLeft: ... ;
mbRight: ... ;
mbMiddle: ... ;
end;
BAngel (2006-05-08 21:46:00) [2]
> procedure TForm1.KaртинкаMouseDown(Sender: TObject; Button:
> TMouseButton;
А как эту процедуру вызывать. Она почему то не ставится в Object Inspector на OnMouseDown
BAngel (2006-05-08 14:34:00) [3]
>
> Что есть каритинка?
TImage
Пусик (2006-05-08 14:15:00) [4]
> BAngel
Что есть каритинка?
BAngel (2006-05-08 14:08:00) [5]у меня щас некоторые проблемы с делфи, так что не могу проверить. Зарание спасибо. Я ещё вернусь с вопросами
KilkennyCat (2006-05-08 13:41:00) [6]procedure TForm1.KaртинкаMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
Button может принимать следующие значения: mbLeft, mbRight, mbMiddle
end;