Delphi-Quellcode:
DockPanel ist TLMDdocksite
procedure TfrmV1.Docking;
begin
ManualDock(DockPanel, nil, alBottom);
end;
Dragkind = dkDock
DragMode = dmAutomatic
ManualDock ist eine Methode von TForm!
Ich docke, nachdem ein Button betätigt wurde. Der Button ruft docking auf. Ansonsten habe ich keine besonderen Sachen hinsichtlich des Dockens.
Nur das Einstellen des Dockingpanels ist noch mal ein gewisser Aufwand, da ggf Buttons, Caption und Image zugeordnet werden müssen.