richmemo: win32 corrected insertion of inline object - use specified start character and characters length

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

components/richmemo/win32/win32richmemo.pas

@@ -823,6 +823,7 @@ begin
 
   RichEditManager.GetSelection(hnd, ss, sl);
   try
+    RichEditManager.SetSelection(hnd, ATextStart, ATextLength);
     SendMessage(hnd, EM_GETOLEINTERFACE, 0, LPARAM(@rch));
 
     FillChar(Fmt, sizeoF(Fmt), 0);