在DELPHI下有何种方法与VB for each...next使用一样.

Question

请教一个问题:在VB下的for each...next,在DELPHI下何种方法解决,最好有例子.

Answer 1

用for to do很难实现，Delphi2006有for in do

Answer 2

有无办法解决呢,我是用Delphi7.

Answer 3

如果是针对某个集的迭代访问元素，还是可以实现。但要做到通用的话，就不能了。也许borland也考虑到这个，所以Delphi在后面的版本加了新的语法。

Answer 4

建个 i的映射关系就可以了  f(i)=each1
a[1]:='each1'

Answer 5

delphi里集合是无序的。。 想遍历整个集合元素需要加个 编号 或者链表方式。
procedure TForm4.Button1Click(Sender: TObject);
var
sl:tstringlist;
i:integer ;
begin
sl:=tstringlist.Create;
sl.Delimiter:=',';
sl.DelimitedText:='element1,element2,element3';
for I := 0 to sl.Count - 1 do
  begin
  //
  end;
sl.Free;end;