From 4c645c6ccbef274cea4e93cf02e5402a5d8d9c9a Mon Sep 17 00:00:00 2001 From: Basile Burg Date: Sun, 10 Aug 2014 06:10:09 +0200 Subject: [PATCH] fix minimized widget were not shown anymore on next cession --- src/ce_main.pas | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) diff --git a/src/ce_main.pas b/src/ce_main.pas index 71ce3ef7..1f35922a 100644 --- a/src/ce_main.pas +++ b/src/ce_main.pas @@ -512,8 +512,16 @@ end; procedure TCEMainForm.SaveDocking; var xcfg: TXMLConfigStorage; + i: NativeInt; begin - WindowState := wsNormal; + if WindowState = wsMinimized then + WindowState := wsNormal; + for i:= 0 to fWidgList.Count-1 do + begin + if DockMaster.GetAnchorSite(fWidgList.widget[i]).WindowState = wsMinimized then + DockMaster.GetAnchorSite(fWidgList.widget[i]).WindowState := wsNormal; + DockMaster.GetAnchorSite(fWidgList.widget[i]).Show; + end; if not Visible then exit; // xcfg := TXMLConfigStorage.Create(getDocPath + 'docking.xml',false);