Come si converte un numero intero in un tipo enumerato?

Question

So come convertire un tipo enumerato in un numero intero.

type 
    TMyType = (mtFirst, mtSecond, mtThird); 

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

Ma come si fa l'operazione inversa e si converte un numero intero in un tipo enumerato?

Answer 1

Come rispose Ken, basta lanciarlo. Ma per assicurarsi di avere valore corretto è possibile utilizzare il codice come:

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

Si può lanciare il numero intero per typecasting al tipo enumerato:

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

Answer 3

Fate attenzione con getto perché richiede completa mappatura con il vostro tipo ordinale e interi. Ad esempio:

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