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

【推广】 免费学中医，健康全家人
原文地址：https://www.cnblogs.com/tc310/p/15045470.html