德尔福有没有得到一个循环？

发布时间：2020-12-15 10:13:47 所属栏目：大数据来源：网络整理

导读：我已经读过，Delphi应该是为Delphi 9中的每个循环获得的。这个功能是否已经成为这个语言？我的Delphi 2009 IDE似乎没有识别每个语法。这是我的代码： procedure ProcessDirectory(p_Directory,p_Output : string); var files : TStringList; filePath : stri

我已经读过，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;

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!