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

richmemo: fix the superscript detection on Win32. Patch by Vladimir Rybant

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6722 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
skalogryz
2018-11-10 02:54:29 +00:00
parent 474e22c385
commit 55159c505e
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/richmemo/win32/win32richmemoproc.pas
View File

@ -324,7 +324,7 @@ end;
function EffectsToVScriptPost(Effects: LongWord): TVScriptPos; function EffectsToVScriptPost(Effects: LongWord): TVScriptPos;
begin begin
if Effects and CFE_SUBSCRIPT > 0 then Result:=vpSubScript if Effects and CFE_SUBSCRIPT > 0 then Result:=vpSubScript
else if Effects and CFE_SUBSCRIPT > 0 then Result:=vpSuperScript else if Effects and CFE_SUPERSCRIPT > 0 then Result:=vpSuperScript
else Result:=vpNormal; else Result:=vpNormal;
end; end;