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

Завести процедуру даблклик   Найти похожие ветки 

← →
b86   (2010-10-14 14:27) [0]

Здравствуйте. У меня картинка перемещается по форме драг-дропом, мне надо на эту картинку повесить даблклик, так что бы она работала? клик правой кнопкой занят. нужен именно даблклик

---

← →
Anatoly Podgoretsky ©   (2010-10-14 14:29) [1]

> b86  (14.10.2010 14:27:00)  [0]

А что ты для этого сделал?

---

← →
b86   (2010-10-14 14:36) [2]

воспользовался стандартным способом. он не работает, по этому спрашиваю.

---

← →
brother ©   (2010-10-15 06:11) [3]

> воспользовался стандартным способом. он не работает,

покажи код... и что именно не работает?

---

← →
b86   (2010-10-15 09:19) [4]

procedure TForm4.Image0DragDrop(Sender, Source: TObject; X, Y: Integer);
begin
 with Source as TImage do
 begin
   Left:=X;
   Top:=Y;
 end;
end;

procedure TForm4.Image0DragOver(Sender, Source: TObject; X, Y: Integer;
 State: TDragState; var Accept: Boolean);
begin
 accept:=Source is Timage;
end;

procedure TForm4.Image1ContextPopup(Sender: TObject; MousePos: TPoint;
 var Handled: Boolean);
begin
 label3.Caption:="Клик правой работает"
end;

procedure TForm4.Image1Click(Sender: TObject);
begin
 label3.Caption:="Привет"
 // "Привет" мне и не пишет
end;

---

← →
sniknik ©   (2010-10-15 09:26) [5]

// "Привет" мне и не пишет
убери "автоподьем" "драга" у компонента и стартуй его тут "вручную" после "привета" вместо комментария...

нафига сложные схемы придумывать когда "проблема" пара пустяков, решается чтением хелпа по "стандартному способу".

---

← →
Плохиш ©   (2010-10-15 11:00) [6]

> решается чтением хелпа по "стандартному способу".

Хелпу вообще для ботаников написали, крютые пацанчики им не пользуются.

PS. Мне вот интересно, значит обработчик OnClick это блондинко умудрилось как-то создать, а вот рядом обработчик OnDblClick не заметило...

---

← →
sniknik ©   (2010-10-15 11:46) [7]

> а вот рядом обработчик OnDblClick не заметило...
может и заметило, но оно тоже не работает при "стандартном способе". просто сказать об этом не удосужилось.

---

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

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



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