在枚舉類型的值和字符串之間相互轉換

Uses TypInfo;
//定義枚舉類型
type
TDayofWeek=(Monday,Tuesday,Wednesday,Thursday,FriDay,Saturday,Sunday);

//由值轉換爲字符串
GetEnumName(TypeInfo(TDayofWeek),Ord(Monday);
//結果應該是字符串'Monday';

//由字符串得到值
GetEnumValue(TypeInfo(TDayofWeek),'Monday');
//結果應該是0. 當然你也可以用強制類型轉換得到枚舉值 TDayofWeek(0)=Monday