Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

In this Discussion

Docking a new tabbed LmdPanel

edited August 2015 in LMD-Tools Vote Up0Vote Down
I want to dock by program a new tabbed window (LmdDockPanel) to a dock site.
I actually I use the following code :

fDockSite.DockControl(vLmdDockPanel,fDockSite.SpaceZone,alClient);

but the new window is docked "at the start" of the other tabbed Windows (on the left)
But I would like it to be docked "at the end" (right) of other tabbed Windows.

Thanks

Comments

  • 2 Comments sorted by Votes Date Added
  • Hi,

    This aspect is demonstrated in LMD-DockingPack demo. You can adjust panels's Zone.Index after it has been docked:

    procedure TfrmMain.New1Click(Sender: TObject);
    var
      pnl: TLMDDockPanel;
    begin
      pnl := CreateTextDoc;

      if pnl.Zone <> nil then
      begin
        pnl.Zone.Index := pnl.Zone.Parent.ZoneCount - 1;
        pnl.Show; // Activate.
      end;
    end;

    Eugene,
    LMD Innovative.
Sign In or Register to comment.