diff --git a/components/anchordocking/anchordocking.pas b/components/anchordocking/anchordocking.pas index ee632df181..0de3e9fd8f 100644 --- a/components/anchordocking/anchordocking.pas +++ b/components/anchordocking/anchordocking.pas @@ -1444,7 +1444,7 @@ begin FDockParentMargin := Source.FDockParentMargin; FDockSitesCanBeMinimized := Source.FDockSitesCanBeMinimized; FDragTreshold := Source.FDragTreshold; - FloatingWindowsOnTop := Source.FFloatingWindowsOnTop; + FFloatingWindowsOnTop := Source.FFloatingWindowsOnTop; FHeaderAlignLeft := Source.FHeaderAlignLeft; FHeaderAlignTop := Source.FHeaderAlignTop; FHeaderFilled := Source.FHeaderFilled; @@ -1474,7 +1474,7 @@ begin DockParentMargin := Config.GetValue('DockParentMargin',10); DockSitesCanBeMinimized := Config.GetValue('DockSitesCanBeMinimized',False); DragTreshold := Config.GetValue('DragThreshold',4); - FloatingWindowsOnTop := Config.GetValue('FFloatingWindowsOnTop',false); + FloatingWindowsOnTop := Config.GetValue('FloatingWindowsOnTop',false); HeaderAlignLeft := Config.GetValue('HeaderAlignLeft',120); HeaderAlignTop := Config.GetValue('HeaderAlignTop',80); HeaderFilled := Config.GetValue('HeaderFilled',true); @@ -1522,7 +1522,7 @@ begin Config.SetDeleteValue('DockParentMargin',DockParentMargin,10); Config.SetDeleteValue('DockSitesCanBeMinimized',DockSitesCanBeMinimized,False); Config.SetDeleteValue('DragThreshold',DragTreshold,4); - Config.SetDeleteValue('FloatingWindowsOnTop',FFloatingWindowsOnTop,false); + Config.SetDeleteValue('FloatingWindowsOnTop',FloatingWindowsOnTop,false); Config.SetDeleteValue('HeaderAlignLeft',HeaderAlignLeft,120); Config.SetDeleteValue('HeaderAlignTop',HeaderAlignTop,80); Config.SetDeleteValue('HeaderFilled',HeaderFilled,true); @@ -1546,7 +1546,7 @@ begin and (DockParentMargin=Settings.DockParentMargin) and (DockSitesCanBeMinimized=Settings.DockSitesCanBeMinimized) and (DragTreshold=Settings.DragTreshold) - and (FloatingWindowsOnTop=Settings.FFloatingWindowsOnTop) + and (FloatingWindowsOnTop=Settings.FloatingWindowsOnTop) and (HeaderAlignLeft=Settings.HeaderAlignLeft) and (HeaderAlignTop=Settings.HeaderAlignTop) and (HeaderFilled=Settings.HeaderFilled) diff --git a/components/anchordocking/minide/miniide1.lpi b/components/anchordocking/minide/miniide1.lpi index 82ffebb639..d63448fa3b 100644 --- a/components/anchordocking/minide/miniide1.lpi +++ b/components/anchordocking/minide/miniide1.lpi @@ -1,32 +1,37 @@ - + + + + - - - - - - - + + + + + + + + + @@ -55,7 +60,9 @@ + + @@ -78,6 +85,9 @@ + + + diff --git a/components/anchordocking/minide/miniide1.lpr b/components/anchordocking/minide/miniide1.lpr index 80d1dbaa71..e79d0974bb 100644 --- a/components/anchordocking/minide/miniide1.lpr +++ b/components/anchordocking/minide/miniide1.lpr @@ -12,6 +12,7 @@ uses {$R *.res} begin + Application.Title := ''; Application.Initialize; Application.CreateForm(TMainIDE, MainIDE); if (Paramcount>0) then