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

IDE, SourceEditor: Workaround for XFCE issue with focus after completion-form. Issue #17533

Browse Source 
git-svn-id: trunk@27643 -
This commit is contained in:
martin 2010-10-10 19:29:45 +00:00
parent 9da784edf0
commit 700bc8469b
1 changed files with 16 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
ide/sourceeditor.pp
View File

@ -7938,16 +7938,25 @@ begin
// the codetools are used)
CodeToolBoss.IdentifierList.Clear;
FDefaultCompletionForm.CurrentCompletionType:=ctNone;
(* SetFocus and Deactivate will all trigger this proc to be reentered.
Setting "CurrentCompletionType:=ctNone" ensures an immediate exit
*)
(* Due to a bug under XFCE we must move focus before we close the form
This is relevant if the form is closed by enter/escape key
*)
if PluginFocused and (ActiveEditor<>nil) then
TSourceEditor(ActiveEditor).FocusEditor;
(* hide/close the form *)
FDefaultCompletionForm.Deactivate;
if PluginFocused and (ActiveEditor<>nil) then begin
{$IFDEF LCLQT}
// Need to force the correct form too (QT)
(* Ensure focus *after* the form was closed.
This is the normal implementation (all but XFCE)
*)
if PluginFocused and (ActiveEditor<>nil) then
TSourceEditor(ActiveEditor).FocusEditor;
{$ELSE}
TSourceEditor(ActiveEditor).EditorComponent.SetFocus;
{$ENDIF}
end;
end;
procedure TSourceEditorManagerBase.RegisterCompletionPlugin(