Delphi7如何遍历元素?

[「已注销」]

我是DELPHI7初学者，竟然发现教材通遍都没有讲如何遍历（子界、数组、集合）元素？高一点的版本用 for in,难道delphi真的不能遍历吗？请高手解惑，如果真不能遍历，那对Delphi7真的很失望！！！

[一路随云]

.....................这问题 for while repeate 都可以遍历

[「已注销」]

procedure TForm1.FormCreate(Sender: TObject);
type T1=1..25;
 tt=set of T1;
 var mytt:tt;
begin
mytt:=[1,2,3,4,5];
showmessage(inttostr(mytt[2]));
end;

以上代码有错吗？就是弹出不来！

[骑牛上铂金]

type T1=1..25;
     tt=set of T1;
var mytt:tt;
    i:integer;
begin
 mytt:=[1,2,3,4,5];
 for i in mytt do
  showmessage(intTostr(i))


end;

[缘中人]

for i:=low(array) to hight(array) begin ... end

[「已注销」]

4楼是的高版本的DELPHI吧，我的只是DELPHI7不支持 for in语句的！！！

[lyhoo163]

建议计一本有关Pascal算法的书。