取得一个枚举类型有多少个元素

时间:2010-01-26 14:50:39  来源:第二电脑网  作者:第二电脑网

  第二电脑网导读:e8" border="1">typeTEumType=(eTest1,eTest2);vari:TEumType;R:integer;begin  R:=0;  for i:=Low(i) to High(i) do  inc(R);end;其中R就是结果了。 ...
  正文:

如何得到枚举类型内容的长度,如 tGetData(gdInteger,gdFloat) 得到 结果 2?

用Low和High配合循环就可以了:


type
TEumType=(eTest1,eTest2);
var
i:TEumType;
R:integer;
begin
  R:=0;
  for i:=Low(i) to High(i) do
  inc(R);
end;

其中R就是结果了。


"取得一个枚举类型有多少个元素"由第二电脑网原创提供,转载请注明:http://www.002pc.com/master/College/Language/Delphi/2010-01-26/12448.html


关键字:

关于《取得一个枚举类型有多少个元素》文章的评论

站内搜索: 高级搜索

热门搜索: Windows style 系统 tr IP QQ CPU 安装 function 注册 if td