pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

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

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3850 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
skalogryz
2014-12-23 13:17:28 +00:00
parent 01753e2ba7
commit c147bf9ceb
1 changed files with 1 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
components/richmemo/win32/win32richmemo.pas
View File

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