我已经读过，Delphi应该是为Delphi 9中的每个循环获得的。这个功能是否已经成为这个语言？我的Delphi 2009 IDE似乎没有识别每个语法。这是我的代码：
procedure ProcessDirectory(p_Directory,p_Output : string);
var
files : TStringList;
filePath : string;
begin
files := GetSubfiles(p_Directory);
try
for (filePath in files.Strings) do
begin
// do something
end;
finally
files.Free;
end;
end;
解决方法
procedure ProcessDirectory(p_Directory,p_Output : string);
var
files : TStringList;
filePath : string;
begin
files := GetSubfiles(p_Directory);
try
for filePath in files do
begin
// do something
end;
finally
files.Free;
end;
end;