delphi中For..In语句的使用

For..In语句用于遍历一个集合，它支持的对象如下：
Classes.TList
Classes.TCollection
Classes.TStrings
Classes.TInterfaceList
Classes.TComponent
Menus.TMenuItem
ActnList.TCustomActionList
DB.TFields
ComCtrls.TListItems
ComCtrls.TTreeNodes
ComCtrls.TToolBar

同时也支持这些对象的子类。

比较常用的是遍历一个TStringList，如下：
begin
for s in SL do
begin
    ShowMessage(s);
end;
end;

其次是遍历数组，如下：
TDemoArray : array[0..10] of Integer = (1,2,3,4,5,6,7,8,9,10);
DemoArray: TDemoArray;
begin
for i in DemoArray do
begin
    ShowMessage(IntToStr(i));
end;
end;
本文转自:http://hi.baidu.com/rarnu

Tags: delphi for..indelphi for..in