diff --git a/src/ce_editor.pas b/src/ce_editor.pas
index 5e662c1e..7cd41c19 100644
--- a/src/ce_editor.pas
+++ b/src/ce_editor.pas
@@ -380,6 +380,7 @@ begin
   document.OnCommandProcessed:= @memoCmdProcessed;
   //
   fDoc := document;
+  fDoc.setFocus;
   focusedEditorChanged;
   updateImperative;
 end;