From 73cadf2ccc06e6413f828fa1c6bbcc80d9532e6a Mon Sep 17 00:00:00 2001 From: martin Date: Wed, 11 Sep 2013 17:52:06 +0000 Subject: [PATCH] Debugger, IDE: After new fix in rev 42734: REVERT 42669 #59d1dc53d2 [[SynEdit in Paintlock => debugger not processmessages]] git-svn-id: trunk@42735 - --- ide/sourcesyneditor.pas | 17 +++-------------- 1 file changed, 3 insertions(+), 14 deletions(-) diff --git a/ide/sourcesyneditor.pas b/ide/sourcesyneditor.pas index a3b3b6784b..2d89de584b 100644 --- a/ide/sourcesyneditor.pas +++ b/ide/sourcesyneditor.pas @@ -47,8 +47,8 @@ uses LazSynIMM, {$ENDIF} Classes, SysUtils, Controls, LCLProc, LCLType, Graphics, Menus, math, LazarusIDEStrConsts, - SynEdit, SynEditMiscClasses, SynGutter, SynGutterBase, SynEditMarks, - SynEditTypes, SynGutterLineNumber, SynGutterCodeFolding, SynGutterMarks, SynGutterChanges, + SynEdit, SynEditMiscClasses, SynGutter, SynGutterBase, SynEditMarks, SynEditTypes, + SynGutterLineNumber, SynGutterCodeFolding, SynGutterMarks, SynGutterChanges, SynGutterLineOverview, SynEditMarkup, SynEditMarkupGutterMark, SynEditMarkupSpecialLine, SynEditTextBuffer, SynEditFoldedView, SynTextDrawer, SynEditTextBase, LazSynEditText, SynPluginTemplateEdit, SynPluginSyncroEdit, LazSynTextArea, SynEditHighlighter, @@ -239,7 +239,6 @@ type function CreateGutter(AOwner : TSynEditBase; ASide: TSynGutterSide; ATextDrawer: TheTextDrawer): TSynGutter; override; procedure SetHighlighter(const Value: TSynCustomHighlighter); override; - procedure SetUpdateState(NewUpdating: Boolean; Sender: TObject); override; public constructor Create(AOwner: TComponent); override; destructor Destroy; override; @@ -449,7 +448,7 @@ type implementation -uses SourceMarks, BaseDebugManager; +uses SourceMarks; { TSourceSynSearchTermDict } @@ -1586,16 +1585,6 @@ begin HighlightUserWords[i].ResetWordBreaks; end; -procedure TIDESynEditor.SetUpdateState(NewUpdating: Boolean; Sender: TObject); -begin - case NewUpdating of - True: DebugBoss.LockCommandProcessing; - False: DebugBoss.UnLockCommandProcessing; - end; - - inherited SetUpdateState(NewUpdating, Sender); -end; - constructor TIDESynEditor.Create(AOwner: TComponent); begin inherited Create(AOwner);