diff --git a/components/codetools/finddeclarationtool.pas b/components/codetools/finddeclarationtool.pas
index 1df57a88ec..ce6aa9f516 100644
--- a/components/codetools/finddeclarationtool.pas
+++ b/components/codetools/finddeclarationtool.pas
@@ -10119,7 +10119,7 @@ var
   AliasType: TFindContext;
   Params: TFindDeclarationParams;
 begin
-  Result:=Default(TExpressionType);
+  Result:=CleanExpressionType;
   if Node=nil then
     RaiseException(20170421212058,'TFindDeclarationTool.FindExpressionTypeOfConstSet Node=nil');
   {$IFDEF CheckNodeTool}