Docking a new tabbed LmdPanel

Walker

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

balabuev

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.