Question

I'm using components from TMS and I'd like to know how to allow AdvToolBar to dock into AdvDockPanels without allowing it to undock and then appearing like a solo Form.

I'm looking for an option like:

DockMode := [dmCannotFloat];

Was it helpful?

Solution 2

In the event EndMove of TAdvCustomToolBar I add those lines to make it act like the Property AutoDockOnClose and that does just what I want. AllowFloating is set to True.

{$IFDEF CHALAM}
   if (Assigned(FLastDock)) then
   begin
      self.Parent := FLastDock;
      if FFloatingWindow <> nil then
      begin
         FFloatingWindow.Free;
         FFloatingWindow := nil;
      end;
   end;
{$ENDIF}

OTHER TIPS

So far it's not possible. You could set AllowFloating to false but then you can only move the toolbar in the current DockPanel

Licensed under: CC-BY-SA with attribution
Not affiliated with StackOverflow
scroll top