0

TMSのコンポーネントを使用していますが、AdvToolBarをドッキング解除してソロフォームのように表示せずにAdvDockPanelsにドッキングできるようにする方法を知りたいです。

私は次のようなオプションを探しています:

DockMode := [dmCannotFloat];

4

2 に答える 2

1

これまでのところ、それは不可能です。falseに設定AllowFloatingすることもできますが、移動できるのは現在のDockPanelのツールバーのみです。

于 2012-05-23T17:53:12.237 に答える
0

TAdvCustomToolBarのEndMoveのイベントでは、これらの行を追加して、プロパティAutoDockOnCloseのように動作させ、それが私が望むことを実行します。AllowFloatingはTrueに設定されています。

{$IFDEF CHALAM}
   if (Assigned(FLastDock)) then
   begin
      self.Parent := FLastDock;
      if FFloatingWindow <> nil then
      begin
         FFloatingWindow.Free;
         FFloatingWindow := nil;
      end;
   end;
{$ENDIF}
于 2012-05-31T17:42:46.990 に答える