会员
周边
新闻
博问
AI培训
云市场
所有博客
当前博客
我的博客
我的园子
账号设置
简洁模式
...
退出登录
注册
登录
我的博客
未取,吾将上下而求索
博客园
首页
新随笔
联系
订阅
管理
2008年9月13日
delphi中遍历枚举类型的方法
摘要: 刚好碰到 ,顺便试了下,有需要的朋友可以看看。 uses TypInfo; type TOrderType = (otFN,otGR,otSZ);var pi:PTypeInfo; i:Integer; ot:TOrderType; s:String;begin pi:= TypeInfo(TOrderType); with GetTypeData(pi)^ do begin for i :=...
阅读全文
posted @ 2008-09-13 23:11 ypq
阅读(11708)
评论(1)
推荐(0)
编辑
公告