diff --git a/components/codetools/finddeclarationtool.pas b/components/codetools/finddeclarationtool.pas
index 62433d7283..cc67997768 100644
--- a/components/codetools/finddeclarationtool.pas
+++ b/components/codetools/finddeclarationtool.pas
@@ -1266,7 +1266,10 @@ begin
                 NewTool.ReadNextAtom;
                 Result:=Result+' = '+NewTool.GetAtom;
               end;
-
+              
+            else
+              writeln('ToDo: TFindDeclarationTool.FindSmartHint TypeNode=',
+                TypeNode.DescAsString);
             end;
           end;
           if NewNode.Desc=ctnConstDefinition then begin