[dmdx]

Приветствую.
Народ подскажите такую вещь есть два ControlBar'а и один ToolBar. Для перемещение из одного в другой у ToolBar соответственно выставлены

Код:

DragKind := dkDock;
DragMode := dmAutomatic;

Соответственно. Toolbar можно таскать из одного ControlBar в другой. Можно даже вытаскивать их из ControlBar'ов. ToolBar тогда весит в своей формочке (панельки) и перемещается по экрану.
Далее делаю так:

Код:

// программно перетащить на ControlBar1
ToolBar.parent := ControlBar1;

// программно перетащить на ControlBar2
ToolBar.parent := ControlBar2;

Вопрос: А как мне программно вытащить ToolBar из панелек? что бы он весил в своей формочке (панельки) и перемещается по экрану.
Спасибо за внимание.

[lmikle]

Попробуй parent поставить в nil.

[dmdx]

Сообщение от lmikle

Попробуй parent поставить в nil.

Некатит. Тогда вообще исчезает.
Также пробовал self тож не то.

[dmdx]

Разобрался

Код:

var
 p : TPoint;   
p :=      ClientToScreen(ToolBarSend.ClientRect.TopLeft);
ToolBarSend.ManualFloat(Rect(P.X,P.Y,P.X+ToolBarSend.Width,P.Y+ToolBarSend.Height));