delphi - 如何将整数转换为枚举类型？

Question

我知道如何将枚举类型转换为整数。

type
  TMyType = (mtFirst, mtSecond, mtThird); 

var 
  ordValue:integer;
  enumValue:TMyType;
...
ordValue:= Ord(mtSecond); // result is 1

但是如何进行逆运算并将整数转换为枚举类型呢？

Answer 1

正如肯回答的那样，你只是施放它。但为了确保你有正确的值，你可以使用如下代码:

if (ordValue >= Ord(Low(TMyType))) and (ordValue <= Ord(High(TMyType))) then
    enunValue := TMyType(ordValue)
else 
    raise Exception.Create('ordValue out of TMyType range');