Ada String to Enumeration Conversion

Question

我想将现有字符串转换为枚举（不是作为枚举读取）。我怎么能这样做？

Answer 1

示例：

-- type declaration
type Hands is (Left, Right);

-- code body
Hand : Hands;
Hand := Hands'Value("Left"); -- yields `Left`