diff --git a/components/codetools/finddeclarationtool.pas b/components/codetools/finddeclarationtool.pas index 959df643f0..a35045050e 100644 --- a/components/codetools/finddeclarationtool.pas +++ b/components/codetools/finddeclarationtool.pas @@ -1237,12 +1237,14 @@ begin // identifier category and identifier if NewNode<>nil then begin case NewNode.Desc of - ctnVarDefinition, ctnTypeDefinition, ctnConstDefinition: + ctnVarDefinition, ctnTypeDefinition, ctnConstDefinition, + ctnEnumIdentifier: begin case NewNode.Desc of ctnVarDefinition: Result:=Result+'var '; ctnTypeDefinition: Result:=Result+'type '; ctnConstDefinition: Result:=Result+'const '; + ctnEnumIdentifier: Result:=Result+'enum '; end; NewTool.MoveCursorToNodeStart(NewNode); NewTool.ReadNextAtom;