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

SynEdit: Ifdef Markup: reset idle timer on EditorStateChange only

Browse Source 
git-svn-id: trunk@41207 -
This commit is contained in:
martin 2013-05-15 12:25:06 +00:00
parent 618c00afa9
commit 643bc6aa9d
1 changed files with 2 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
ide/sourceeditor.pp
View File

@ -943,6 +943,7 @@ type
procedure FreeCompletionPlugins; procedure FreeCompletionPlugins;
function GetScreenRectForToken(AnEditor: TCustomSynEdit; PhysColumn, PhysRow, EndColumn: Integer): TRect; function GetScreenRectForToken(AnEditor: TCustomSynEdit; PhysColumn, PhysRow, EndColumn: Integer): TRect;
protected protected
CodeToolsToSrcEditTimer: TTimer;
function GetActiveCompletionPlugin: TSourceEditorCompletionPlugin; override; function GetActiveCompletionPlugin: TSourceEditorCompletionPlugin; override;
function GetCompletionBoxPosition: integer; override; function GetCompletionBoxPosition: integer; override;
function GetCompletionPlugins(Index: integer): TSourceEditorCompletionPlugin; override; function GetCompletionPlugins(Index: integer): TSourceEditorCompletionPlugin; override;
@ -1090,7 +1091,6 @@ type
function SomethingModified(Verbose: boolean = false): boolean; function SomethingModified(Verbose: boolean = false): boolean;
procedure HideHint; procedure HideHint;
procedure OnIdle(Sender: TObject; var Done: Boolean); procedure OnIdle(Sender: TObject; var Done: Boolean);
procedure OnUserInput(Sender: TObject; Msg: Cardinal);
procedure LockAllEditorsInSourceChangeCache; procedure LockAllEditorsInSourceChangeCache;
procedure UnlockAllEditorsInSourceChangeCache; procedure UnlockAllEditorsInSourceChangeCache;
procedure BeginGlobalUpdate; procedure BeginGlobalUpdate;
@ -1108,7 +1108,6 @@ type
ASynAutoComplete: TCustomSynAutoComplete; ASynAutoComplete: TCustomSynAutoComplete;
Index: integer); Index: integer);
protected protected
CodeToolsToSrcEditTimer: TTimer;
procedure CodeToolsToSrcEditTimerTimer(Sender: TObject); procedure CodeToolsToSrcEditTimerTimer(Sender: TObject);
procedure OnWordCompletionGetSource(var Source: TStrings; SourceIndex: integer); procedure OnWordCompletionGetSource(var Source: TStrings; SourceIndex: integer);
procedure OnSourceCompletionTimer(Sender: TObject); procedure OnSourceCompletionTimer(Sender: TObject);
@ -8702,6 +8701,7 @@ end;
procedure TSourceEditorManagerBase.DoEditorStatusChanged(AEditor: TSourceEditor); procedure TSourceEditorManagerBase.DoEditorStatusChanged(AEditor: TSourceEditor);
begin begin
CodeToolsToSrcEditTimer.Enabled:=false;
FChangeNotifyLists[semEditorStatus].CallNotifyEvents(AEditor); FChangeNotifyLists[semEditorStatus].CallNotifyEvents(AEditor);
end; end;
@ -9911,11 +9911,6 @@ begin
end; end;
end; end;
procedure TSourceEditorManager.OnUserInput(Sender: TObject; Msg: Cardinal);
begin
CodeToolsToSrcEditTimer.Enabled:=false;
end;
procedure TSourceEditorManager.LockAllEditorsInSourceChangeCache; procedure TSourceEditorManager.LockAllEditorsInSourceChangeCache;
// lock all sourceeditors that are to be modified by the CodeToolBoss // lock all sourceeditors that are to be modified by the CodeToolBoss
var var
@ -10252,7 +10247,6 @@ begin
true,@GetDefaultLayout); true,@GetDefaultLayout);
Application.AddOnIdleHandler(@OnIdle); Application.AddOnIdleHandler(@OnIdle);
Application.AddOnUserInputHandler(@OnUserInput);
end; end;
destructor TSourceEditorManager.Destroy; destructor TSourceEditorManager.Destroy;