fix close window in RxMDI

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2652 8e941d3f-bd1b-0410-a28a-d453659cc2b4

components/rx/docs/rxfpc.xml

@@ -1,4 +1,4 @@
-<?xml version="1.0"?>
+<?xml version="1.0" encoding="utf-8"?>
 <fpdoc-descriptions>
   <package name="dcl_rx_fpc">
     <short>Пакет времени разработки</short>
@@ -164,6 +164,7 @@
             
             
             
+            
             <link id="TRxDBGrid">RxDBGrid</link>-а.</p>
         </descr>
       </element>
@@ -568,6 +569,7 @@
             
             
             
+            
             <link id="TRxDBGrid">RxDBGrid</link>-а.</p>
         </descr>
         <seealso>
@@ -610,7 +612,10 @@
           <link id="TRxDBGridSortEngine"/>
         </seealso>
       </element>
-      <element name="TMLCaptionItem"/>
+      <element name="TMLCaptionItem">
+        <short>Элемент многострочного заголовка</short>
+        <descr>Элемент многострочного заголовка</descr>
+      </element>
       <element name="TRxDbGridColumns"/>
       <element name="TRxDbGridColumns.Add"/>
       <element name="TFilterListCellEditor"/>
@@ -1154,6 +1159,7 @@ TRxDBCalcEdit является наследником TDBCalcEdit и имеет
           
           
           
+          
           
           
           <b>Count</b>
@@ -2432,6 +2438,7 @@ Description
             
             
             
+            
             
             
             <b>const</b> SearchDomain, FileName:
@@ -2455,6 +2462,7 @@ Description
             
             
             
+            
             
             
             <b>String</b>;
@@ -2478,6 +2486,7 @@ Description
             
             
             
+            
             
             
             <b>out</b> UserName, DomainName:
@@ -2501,6 +2510,7 @@ Description
             
             
             
+            
             
             
             <b>String</b>);
@@ -2543,6 +2553,7 @@ Description
             
             
             
+            
             <b>const</b> DirName:
             
             
@@ -2560,6 +2571,7 @@ Description
             
             
             
+            
             <b>string</b>):
             
             
@@ -2577,6 +2589,7 @@ Description
             
             
             
+            
             <b>string</b>;</p>
           <p>Функция проверяет все разделители каталогов в указанном имени файла/каталога и, если нужно, меняет их на значение константы<b>DirectorySeparator</b>.</p>
         </descr>
@@ -2606,6 +2619,7 @@ Description
             
             
             
+            
             
             
             <b>string</b>;</p>

components/rx/rxmdi.pas

@@ -675,10 +675,10 @@ procedure TRxMDIButton.FormClose(Sender: TObject; var CloseAction: TCloseAction)
 begin
   if Assigned(FSaveClose) then
     FSaveClose(Sender, CloseAction);
-  Free;
-
   FNavPanel.ChildWindowsShowLast;
   FNavPanel.ShowHiddenBtnOnResize;
+
+  Free;
 end;
 
 constructor TRxMDIButton.CreateButton(AOwner: TRxMDITasks; AForm: TForm);