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

发布时间：2020-12-15 10:16:54 所属栏目：大数据来源：网络整理

导读：我知道如何将枚举类型转换为整数。 type TMyType = (mtFirst,mtSecond,mtThird); var ordValue:integer; enumValue:TMyType;...ordValue:= Ord(mtSecond); // result is 1 但是如何进行逆运算并将整数转换为枚举类型？解决方法正如肯回答，你只是投了。但

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

type
  TMyType = (mtFirst,mtSecond,mtThird); 

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

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

解决方法

正如肯回答，你只是投了。但是要确保您具有正确的价值，您可以使用以下代码：

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

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!