diff --git a/components/codetools/finddeclarationtool.pas b/components/codetools/finddeclarationtool.pas index bcd1ec059e..f36ea790fb 100644 --- a/components/codetools/finddeclarationtool.pas +++ b/components/codetools/finddeclarationtool.pas @@ -10025,6 +10025,7 @@ var TermExprType: TExpressionType; OperatorExprType: TExpressionType; AliasType: TFindContext; + Node: TCodeTreeNode; begin Result:=''; AliasType:=CleanFindContext; @@ -10064,6 +10065,12 @@ begin RaiseTermHasNoIterator; Result:=FindExprTypeAsString(ExprType,TermPos.StartPos,Params,@AliasType); end; + ctnEnumerationType: + begin + Node:=TermExprType.Context.Node.Parent; + if Node.Desc=ctnTypeDefinition then + Result:=TermExprType.Context.Tool.ExtractIdentifier(Node.StartPos); + end; ctnSetType: if TermExprType.Context.Tool.FindEnumerationTypeOfSetType( TermExprType.Context.Node,ExprType.Context)