diff --git a/src/ce_synmemo.pas b/src/ce_synmemo.pas
index 781d430a..7db1669e 100644
--- a/src/ce_synmemo.pas
+++ b/src/ce_synmemo.pas
@@ -1149,8 +1149,6 @@ begin
 end;
 
 procedure TCESynMemo.setFocus;
-var
-  p: TPoint;
 begin
   inherited;
   highlightCurrentIdentifier;
@@ -1164,9 +1162,6 @@ begin
 end;
 
 procedure TCESynMemo.DoEnter;
-var
-  i: integer;
-  p: TPoint;
 begin
   inherited;
   checkFileDate;