paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-01 13:00:25 +02:00
Code Issues Packages Projects Releases Wiki Activity

SynEdit: clean-up

Browse Source 
git-svn-id: trunk@36116 -
This commit is contained in:
martin 2012-03-17 13:56:24 +00:00
parent 49bc6ed0ff
commit 6b347fede8
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
components/synedit/lazsynimm.pas
View File

@ -7,9 +7,9 @@ unit LazSynIMM;
interface
uses
windows, imm, Classes, SysUtils, LMessages, LazLoggerBase, LCLType, LCLProc, Controls,
windows, imm, Classes, SysUtils, LazLoggerBase, LCLType, LCLProc, Controls,
Graphics, SynEditMiscClasses, SynTextDrawer, SynEditPointClasses, SynEditMarkupSelection,
SynEditMarkup, SynEditTypes, SynEditKeyCmds, SynEditTextBase, LazSynEditText;
SynEditMarkup, SynEditTypes, SynEditKeyCmds, LazSynEditText;
type
@ -691,8 +691,6 @@ begin
end;
procedure LazSynImeFull.WMImeStartComposition(var Msg: TMessage);
var
imc: HIMC;
begin
//debugln(['TCustomSynEdit.WMImeStartComposition ']);
FImeBlockSelection.StartLineBytePos := CaretObj.LineBytePos;