int fundido a Enum en Delphi Prism
-
24-09-2019 - |
Pregunta
Básicamente lo mismo que esta pregunta, pero en Delphi Prism:
Me las arreglo para hacerlo desde una cadena:
YourEnum := Enum.Parse(TypeOf(YourEnum), "mystr") as YourEnum
Sin embargo, he intentado lo siguiente y aparece un error de coincidencia de tipos:
YourEnum := 3 as YourNum
Alguna idea de lo que la sintaxis es para convertir int a Enum?
Solución
@Robo, la sintaxis para convertir un int a Enum es
YourEnumVar := YourEnum(3);
o
YourEnumVar := Object(3) as YourEnum;
ver esta muestra
namespace ConsoleAppEnumsDelphiPrism;
interface
type
Language = (Delphi=1,Delphi_Prism,CBuilder);
ConsoleApp = class
public
class method Main;
end;
implementation
class method ConsoleApp.Main;
var
MyEnum : Language;
begin
// String to Enum
MyEnum := Language(Enum.Parse(typeof(Language), 'Delphi_Prism'));
Console.WriteLine(MyEnum.ToString());//Print Delphi_Prism
// Int to Enum
MyEnum:=Language(2);
Console.WriteLine(MyEnum.ToString());//Print Delphi_Prism
// Int to Enum using "as"
MyEnum:= Object(1) as Language;
Console.WriteLine(MyEnum.ToString());//Print Delphi
Console.ReadKey();
end;
end.
Licenciado bajo: CC-BY-SA con atribución
No afiliado a StackOverflow