Исправлен баг с привязкой Flow-объектов к первому параграфу секции (баг...

Исправлен баг с привязкой Flow-объектов к первому параграфу секции (баг 24543). Исправлен баг с копированием параграфа (как следствие баг 24534).

git-svn-id: svn://192.168.3.15/activex/AVS/Sources/TeamlabOffice/trunk/OfficeWeb@56435 954022d7-b5bf-4e40-9824-e11837661b57

Word/Editor/Document.js

@@ -10140,7 +10140,7 @@ CDocument.prototype =
         var ContentPos = this.Internal_GetContentPosByXY( X, Y, PageNum);
 
         // Делаем логику как в ворде
-        if ( true === bAnchor && (0 < ContentPos || PageNum > 0 ) && ContentPos === this.Pages[PageNum].Pos && this.Pages[PageNum].EndPos > this.Pages[PageNum].Pos && type_Paragraph === this.Content[ContentPos].GetType() && true === this.Content[ContentPos].Is_ContentOnFirstPage() )
+        if ( true === bAnchor && ContentPos > 0 && PageNum > 0 && ContentPos === this.Pages[PageNum].Pos && ContentPos === this.Pages[PageNum - 1].EndPos && this.Pages[PageNum].EndPos > this.Pages[PageNum].Pos && type_Paragraph === this.Content[ContentPos].GetType() && true === this.Content[ContentPos].Is_ContentOnFirstPage() )
             ContentPos++;
 
         return this.Content[ContentPos].Get_NearestPos( PageNum, X, Y, bAnchor, Drawing );

Word/Editor/Paragraph.js

@@ -242,6 +242,9 @@ Paragraph.prototype =
         var EndRun = new ParaRun(Para);
         EndRun.Add_ToContent( 0, new ParaEnd() );
         Para.Internal_Content_Add( Para.Content.length, EndRun, false );
+        
+        Para.Selection_Remove();
+        Para.Cursor_MoveToStartPos(false);
 
         return Para;
     },