Delphi枚举类型的值转INT

枚举类型第1个元素值为0，第2个值为1，依此类推，可以用Ord来获取

例如：有枚举类型

E_ScreenColor_G56 = (eSCREEN_COLOR_NUll, eSCREEN_COLOR_SINGLE, // 单基色1
    eSCREEN_COLOR_DOUBLE, // 双基色
    eSCREEN_COLOR_THREE, // 七彩色
    eSCREEN_COLOR_FULLCOLOR // 全彩色
    );

ShowMessage(IntToStr(Ord(eSCREEN_COLOR_DOUBLE))); //uses system

值为2