¿Cómo convierto un entero a un tipo enumerado?

Question

Sé cómo convertir un tipo enumerado en un número entero.

type 
    TMyType = (mtFirst, mtSecond, mtThird); 

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

Pero, ¿cómo puedo hacer la operación inversa y convertir un entero en un tipo enumerado?

Answer 1

Como respondió Ken, que acaba de lanzarlo. Sin embargo, para asegurarse de que tiene valor correcto se puede utilizar un código como:

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

Answer 2

Puede emitir el número entero por typecasting al tipo enumerado:

ordValue := Ord(mtSecond); 
enumValue := TMyType(ordValue); 

Answer 3

Tenga cuidado con la fundición, ya que requiere la cartografía completa con el tipo ordinal y números enteros. Por ejemplo:

type Size = (Small = 2, Medium = 3, Huge = 10); 
var sz: Size; 
... 
sz := Size(3); //means sz=Medium 
sz := Size(7); //7 is in range but gives sz=outbound