Перетаскивание фомы за 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]

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

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