diff --git a/components/codetools/codetoolmanager.pas b/components/codetools/codetoolmanager.pas
index 3c0c568419..f20420402d 100644
--- a/components/codetools/codetoolmanager.pas
+++ b/components/codetools/codetoolmanager.pas
@@ -2613,9 +2613,6 @@ end;
 function TCodeToolManager.AddIncludeDirective(Code: TCodeBuffer;
   const Filename: string; const NewSrc: string
   ): boolean;
-var
-  Tree: TCompilerDirectivesTree;
-  Node: TCodeTreeNode;
 begin
   Result:=false;
   {$IFDEF CTDEBUG}
diff --git a/components/codetools/stdcodetools.pas b/components/codetools/stdcodetools.pas
index 9c77fffaa3..829e2af797 100644
--- a/components/codetools/stdcodetools.pas
+++ b/components/codetools/stdcodetools.pas
@@ -4821,7 +4821,6 @@ end;
 function TStandardCodeTool.FindIncludeDirective(DoBuildTree: boolean;
   var ACleanPos: integer; const Filename: string): boolean;
 var
-  ParamPos: Integer;
   FilenameStartPos: Integer;
   FilenameEndPos: LongInt;
   CommentStart: integer;