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

События мышки   Найти похожие ветки 

← →
BAngel   (2006-05-08 13:37) [0]

Помогите пожалуйста разобраться. Мне нужно что бы прога распознавала когда я на картинке нажимая ЛКМ, а когда ПКМ

---

← →
KilkennyCat ©   (2006-05-08 13:41) [1]

procedure TForm1.KaртинкаMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
 
Button может принимать следующие значения: mbLeft, mbRight, mbMiddle

end;

---

← →
BAngel   (2006-05-08 14:08) [2]

у меня щас некоторые проблемы с делфи, так что не могу проверить. Зарание спасибо. Я ещё вернусь с вопросами

---

← →
Пусик ©   (2006-05-08 14:15) [3]

> BAngel


Что есть каритинка?

---

← →
BAngel   (2006-05-08 14:34) [4]

>
> Что есть каритинка?
TImage

---

← →
BAngel   (2006-05-08 21:46) [5]

> procedure TForm1.KaртинкаMouseDown(Sender: TObject; Button:
>  TMouseButton;

А как эту процедуру вызывать. Она почему то не ставится в Object Inspector на OnMouseDown

---

← →
Мефисто   (2006-05-08 22:37) [6]

>> А как эту процедуру вызывать. Она почему то не ставится в Object Inspector на OnMouseDown

Ее не вставляют. В обработчике компонента OnMouseDown пищем

 case Button of
   mbLeft: ... ;
   mbRight: ... ;
   mbMiddle: ... ;
 end;

---

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

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



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