diff --git a/components/richmemo/win32/win32richmemo.pas b/components/richmemo/win32/win32richmemo.pas
index 24462d630..f01762a22 100644
--- a/components/richmemo/win32/win32richmemo.pas
+++ b/components/richmemo/win32/win32richmemo.pas
@@ -549,10 +549,6 @@ class function TWin32WSCustomRichMemo.GetStyleRange(
 var
   OrigStart : Integer;
   OrigLen   : Integer;
-  hInfo     : TScrollInfo;
-  vInfo     : TScrollInfo;
-  hVisible  : Boolean;
-  vVisible  : Boolean;
   eventmask : longword;
 begin
   if not Assigned(RichEditManager) or not Assigned(AWinControl) then begin