枚举与string之间查找与转换

利用TypInfo单元的GetEnumName和GetEnumValue可以遍历任意枚举类型

 

 

 其实上面程序运行会有err，为什么？因为没有理解和掌握JSON Objects Framework【感到简单问题复杂化了】。好多概念还是IsuperJSON的。