Builder 5.0 "Dock" function

Ja, du har ret - det virker ligesom i andre programmer til f.eks. at flytte tool-bars rundt i forskellige områder af skærmen.

Humlen er at sætte DockSite property'en på den/de paneler der må bruges som dock-site, sætte DragKind til dkDock og DragMode til dmAutomatic. Derudover skal du sætte henholdsvis OnDockDrop og OnUnDock events til:

void __fastcall TForm1::PanelDockDrop(TObject *Sender,
      TDragDockObject *Source, int X, int Y)
{
  if (Source == Image1)
  {
    if (Sender == Panel1 || Sender == Panel2)
    {
      Image1->Parent  = static_cast<TPanel *>(Sender);
    };
    // Image1->DragMode = dmManual;
  };
}
void __fastcall TForm1::PanelUnDock(TObject *Sender, TControl *Client,
      TWinControl *NewTarget, bool &Allow)
{
  if (NewTarget == NULL
  || !NewTarget->ClassNameIs("TPanel"))
    Allow = false;
}

Se også svarene i http://www.eksperten.dk/spm/267850