diff --git a/examples/dockmanager/elasticsite/felastic.lfm b/examples/dockmanager/elasticsite/felastic.lfm
index 7150059696..272a91bc67 100644
--- a/examples/dockmanager/elasticsite/felastic.lfm
+++ b/examples/dockmanager/elasticsite/felastic.lfm
@@ -3,6 +3,7 @@ object DockingSite: TDockingSite
Height = 163
Top = 156
Width = 255
+ AutoSize = True
Caption = 'Dock Site'
ClientHeight = 163
ClientWidth = 255
diff --git a/examples/dockmanager/elasticsite/felastic.lrs b/examples/dockmanager/elasticsite/felastic.lrs
index b50ebe1aac..3e60fe2161 100644
--- a/examples/dockmanager/elasticsite/felastic.lrs
+++ b/examples/dockmanager/elasticsite/felastic.lrs
@@ -2,31 +2,31 @@
LazarusResources.Add('TDockingSite','FORMDATA',[
'TPF0'#12'TDockingSite'#11'DockingSite'#4'Left'#3#188#1#6'Height'#3#163#0#3'T'
- +'op'#3#156#0#5'Width'#3#255#0#7'Caption'#6#9'Dock Site'#12'ClientHeight'#3
- +#163#0#11'ClientWidth'#3#255#0#10'LCLVersion'#6#6'0.9.29'#7'Visible'#9#0#6'T'
- +'Panel'#7'pnlLeft'#4'Left'#2#0#6'Height'#3#138#0#3'Top'#2#0#5'Width'#2#0#5'A'
- +'lign'#7#6'alLeft'#7'Caption'#6#7'pnlLeft'#5'Color'#7#7'clWhite'#8'DockSite'
- +#9#11'ParentColor'#8#8'TabOrder'#2#0#10'OnDockDrop'#7#15'pnlLeftDockDrop'#10
- +'OnDockOver'#7#15'pnlLeftDockOver'#13'OnGetSiteInfo'#7#18'pnlLeftGetSiteInfo'
- +#8'OnUnDock'#7#13'pnlLeftUnDock'#0#0#9'TSplitter'#9'splitLeft'#4'Left'#2#0#6
- +'Height'#3#138#0#3'Top'#2#0#5'Width'#2#4#0#0#6'TPanel'#8'pnlRight'#4'Left'#3
- +#255#0#6'Height'#3#138#0#3'Top'#2#0#5'Width'#2#0#5'Align'#7#7'alRight'#7'Cap'
- +'tion'#6#8'pnlRight'#5'Color'#7#6'clAqua'#8'DockSite'#9#11'ParentColor'#8#8
- +'TabOrder'#2#2#10'OnDockDrop'#7#15'pnlLeftDockDrop'#10'OnDockOver'#7#15'pnlL'
- +'eftDockOver'#13'OnGetSiteInfo'#7#18'pnlLeftGetSiteInfo'#8'OnUnDock'#7#13'pn'
- +'lLeftUnDock'#0#0#6'TPanel'#9'pnlBottom'#4'Left'#2#0#6'Height'#2#1#3'Top'#3
- +#142#0#5'Width'#3#255#0#5'Align'#7#8'alBottom'#7'Caption'#6#9'pnlBottom'#8'D'
- +'ockSite'#9#8'TabOrder'#2#3#10'OnDockDrop'#7#15'pnlLeftDockDrop'#10'OnDockOv'
- +'er'#7#15'pnlLeftDockOver'#13'OnGetSiteInfo'#7#18'pnlLeftGetSiteInfo'#8'OnUn'
- +'Dock'#7#13'pnlLeftUnDock'#0#0#9'TSplitter'#10'splitRight'#4'Left'#3#251#0#6
- +'Height'#3#138#0#3'Top'#2#0#5'Width'#2#4#5'Align'#7#7'alRight'#12'ResizeAnch'
- +'or'#7#7'akRight'#0#0#10'TStatusBar'#10'StatusBar1'#4'Left'#2#0#6'Height'#2
- +#20#3'Top'#3#143#0#5'Width'#3#255#0#6'Panels'#14#0#0#0#6'TPanel'#6'Panel1'#4
- +'Left'#2#4#6'Height'#3#138#0#3'Top'#2#0#5'Width'#3#247#0#5'Align'#7#8'alClie'
- +'nt'#7'Caption'#6#6'Client'#12'ClientHeight'#3#138#0#11'ClientWidth'#3#247#0
- +#8'TabOrder'#2#6#0#7'TButton'#9'buNewForm'#4'Left'#2'`'#6'Height'#2#20#3'Top'
- +#2#16#5'Width'#2'>'#7'Caption'#6#8'New Form'#7'OnClick'#7#14'buNewFormClick'
- +#8'TabOrder'#2#0#0#0#0#9'TSplitter'#11'splitBottom'#6'Cursor'#7#8'crVSplit'#4
- +'Left'#2#0#6'Height'#2#4#3'Top'#3#138#0#5'Width'#3#255#0#5'Align'#7#8'alBott'
- +'om'#12'ResizeAnchor'#7#8'akBottom'#0#0#0
+ +'op'#3#156#0#5'Width'#3#255#0#8'AutoSize'#9#7'Caption'#6#9'Dock Site'#12'Cli'
+ +'entHeight'#3#163#0#11'ClientWidth'#3#255#0#10'LCLVersion'#6#6'0.9.29'#7'Vis'
+ +'ible'#9#0#6'TPanel'#7'pnlLeft'#4'Left'#2#0#6'Height'#3#138#0#3'Top'#2#0#5'W'
+ +'idth'#2#0#5'Align'#7#6'alLeft'#7'Caption'#6#7'pnlLeft'#5'Color'#7#7'clWhite'
+ +#8'DockSite'#9#11'ParentColor'#8#8'TabOrder'#2#0#10'OnDockDrop'#7#15'pnlLeft'
+ +'DockDrop'#10'OnDockOver'#7#15'pnlLeftDockOver'#13'OnGetSiteInfo'#7#18'pnlLe'
+ +'ftGetSiteInfo'#8'OnUnDock'#7#13'pnlLeftUnDock'#0#0#9'TSplitter'#9'splitLeft'
+ +#4'Left'#2#0#6'Height'#3#138#0#3'Top'#2#0#5'Width'#2#4#0#0#6'TPanel'#8'pnlRi'
+ +'ght'#4'Left'#3#255#0#6'Height'#3#138#0#3'Top'#2#0#5'Width'#2#0#5'Align'#7#7
+ +'alRight'#7'Caption'#6#8'pnlRight'#5'Color'#7#6'clAqua'#8'DockSite'#9#11'Par'
+ +'entColor'#8#8'TabOrder'#2#2#10'OnDockDrop'#7#15'pnlLeftDockDrop'#10'OnDockO'
+ +'ver'#7#15'pnlLeftDockOver'#13'OnGetSiteInfo'#7#18'pnlLeftGetSiteInfo'#8'OnU'
+ +'nDock'#7#13'pnlLeftUnDock'#0#0#6'TPanel'#9'pnlBottom'#4'Left'#2#0#6'Height'
+ +#2#1#3'Top'#3#142#0#5'Width'#3#255#0#5'Align'#7#8'alBottom'#7'Caption'#6#9'p'
+ +'nlBottom'#8'DockSite'#9#8'TabOrder'#2#3#10'OnDockDrop'#7#15'pnlLeftDockDrop'
+ +#10'OnDockOver'#7#15'pnlLeftDockOver'#13'OnGetSiteInfo'#7#18'pnlLeftGetSiteI'
+ +'nfo'#8'OnUnDock'#7#13'pnlLeftUnDock'#0#0#9'TSplitter'#10'splitRight'#4'Left'
+ +#3#251#0#6'Height'#3#138#0#3'Top'#2#0#5'Width'#2#4#5'Align'#7#7'alRight'#12
+ +'ResizeAnchor'#7#7'akRight'#0#0#10'TStatusBar'#10'StatusBar1'#4'Left'#2#0#6
+ +'Height'#2#20#3'Top'#3#143#0#5'Width'#3#255#0#6'Panels'#14#0#0#0#6'TPanel'#6
+ +'Panel1'#4'Left'#2#4#6'Height'#3#138#0#3'Top'#2#0#5'Width'#3#247#0#5'Align'#7
+ +#8'alClient'#7'Caption'#6#6'Client'#12'ClientHeight'#3#138#0#11'ClientWidth'
+ +#3#247#0#8'TabOrder'#2#6#0#7'TButton'#9'buNewForm'#4'Left'#2'`'#6'Height'#2
+ +#20#3'Top'#2#16#5'Width'#2'>'#7'Caption'#6#8'New Form'#7'OnClick'#7#14'buNew'
+ +'FormClick'#8'TabOrder'#2#0#0#0#0#9'TSplitter'#11'splitBottom'#6'Cursor'#7#8
+ +'crVSplit'#4'Left'#2#0#6'Height'#2#4#3'Top'#3#138#0#5'Width'#3#255#0#5'Align'
+ +#7#8'alBottom'#12'ResizeAnchor'#7#8'akBottom'#0#0#0
]);
diff --git a/examples/dockmanager/elasticsite/felastic.pas b/examples/dockmanager/elasticsite/felastic.pas
index 216819c1ef..78faea8c0f 100644
--- a/examples/dockmanager/elasticsite/felastic.pas
+++ b/examples/dockmanager/elasticsite/felastic.pas
@@ -56,9 +56,10 @@ type
NewTarget: TWinControl; var Allow: Boolean);
private
FAutoExpand: boolean;
+ procedure SetAutoExpand(NewValue: boolean);
public
published
- property AutoExpand: boolean read FAutoExpand write FAutoExpand;
+ property AutoExpand: boolean read FAutoExpand write SetAutoExpand default True;
end;
var
@@ -288,9 +289,14 @@ begin
end;
end;
+procedure TDockingSite.SetAutoExpand(NewValue: boolean);
+begin
+ FAutoExpand:=NewValue;
+end;
+
initialization
{$I felastic.lrs}
- DefaultDockTreeClass := TEasyTree;
+ DefaultDockManagerClass := TEasyTree;
end.
diff --git a/examples/dockmanager/elasticsite/project1.lpi b/examples/dockmanager/elasticsite/project1.lpi
index 6d0d5a10ca..35e4e2c1cd 100644
--- a/examples/dockmanager/elasticsite/project1.lpi
+++ b/examples/dockmanager/elasticsite/project1.lpi
@@ -41,7 +41,7 @@
-
+
@@ -49,12 +49,12 @@
-
-
+
+
-
+
-
+
@@ -69,10 +69,10 @@
-
-
+
+
-
+
@@ -80,7 +80,7 @@
-
+
@@ -88,19 +88,18 @@
-
+
-
-
+
@@ -113,10 +112,10 @@
-
-
+
+
-
+
@@ -125,7 +124,7 @@
-
+
@@ -146,7 +145,7 @@
-
+
@@ -158,10 +157,10 @@
-
-
+
+
-
+
@@ -169,130 +168,130 @@
-
+
-
+
-
+
-
-
+
+
-
-
+
+
-
-
+
+
-
+
-
-
+
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
-
-
+
+
-
+
-
+
-
+
-
-
+
+
-
+
-
+
-
-
+
+
-
-
+
+
-
-
+
+
@@ -314,6 +313,12 @@
+
+
+
+
+
+
diff --git a/examples/dockmanager/elasticsite/project1.lpr b/examples/dockmanager/elasticsite/project1.lpr
index 2af5f5310b..f0cd30f831 100644
--- a/examples/dockmanager/elasticsite/project1.lpr
+++ b/examples/dockmanager/elasticsite/project1.lpr
@@ -7,8 +7,7 @@ uses
cthreads,
{$ENDIF}{$ENDIF}
Interfaces, // this includes the LCL widgetset
- Forms, fElastic, EasyDockMgr, LResources, fTestPanels
- { you can add units after this };
+ Forms, fElastic, EasyDockMgr, LResources;
{$IFDEF WINDOWS}{$R project1.rc}{$ENDIF}
@@ -16,7 +15,6 @@ begin
{$I project1.lrs}
Application.Initialize;
Application.CreateForm(TDockingSite, DockingSite);
- Application.CreateForm(TForm1, Form1);
Application.Run;
end.