diff --git a/src/ce_synmemo.pas b/src/ce_synmemo.pas
index 700608a7..2ad85591 100644
--- a/src/ce_synmemo.pas
+++ b/src/ce_synmemo.pas
@@ -294,6 +294,7 @@ end;
 constructor TCESynMemo.Create(aOwner: TComponent);
 begin
   inherited;
+  SetDefaultKeystrokes; // not called in inherited if owner = nil !
   Font.Quality := fqProof;
   //Font.CharSet := OEM_CHARSET;
   Font.Pitch := fpFixed;