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

Перетаскивание фомы за Edit   Найти похожие ветки 

← →
Ajax ©   (2003-08-14 13:42) [0]

Почему не работает такой код:

procedure TForm1.EditBox1MouseDown(Sender: PControl; var Mouse: TMouseEventData);
begin
form1.Form.DragStart;
end;

и работает такой:

procedure TForm1.Label1MouseDown(Sender: PControl;
 var Mouse: TMouseEventData);
begin
form1.Form.DragStart;
end;

Мне нужно таскать форму мышью и для многих элементов все нормально, но когда хватаешь мышью за Edit ничего не происходит.

---

← →
Ajax ©   (2003-08-15 17:12) [1]

Все. Разобрался.

---

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

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



Память: 0.44 MB
Время: 0.029 c