Как таскать Label по форме

← →
Sprite (2003-09-20 19:42) [0]

Есть некоторый Label необходимо его перетащить мышкой как это сделано в среде Delhi при размещении компонентов.
Заранее благодарен!!!

← →
HolACost! © (2003-09-20 20:08) [1]

OnMouseDown + TLabel.LEft +TLable.Top + OnMouseMove

← →
Sprite (2003-09-23 22:47) [2]

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

← →
Andy BitOff (2003-09-23 23:59) [3]

ReleaseCapture;
Твой_контрол.Perform(WM_SysCommand, $F012, 0);

В событии MouseDown

>> ReleaseCapture;
>> Твой_контрол.Perform(WM_SysCommand, $F012, 0);

Очень интересные эффекты от него бывают, как то таскал я с помощью этого метода панель, так эта панель у меня еще и TStatusBar двигла (перемещение объекта ниже TStatusBar) :)

Как таскать Label по форме Найти похожие ветки