delphi（Pascal 对象）中有没有办法为 java 中的每个点赞制作一个？

Question

我今天开始学习 delphi。 我想知道是否有一种方法可以使用 for each with objects 数组在 java 上制作像我的代码一样的 delphi 代码。 有我的 java 代码：

     class test {
        public static void main(String[] args){

              String[] names={"ali","samad","kamel","djamel","mustapha"};

              for(String name:names){
                      System.out.println("user:"+name);
                  }
          }
       }

谢谢。

Answer 1

您可以使用 for..in 循环，就像这样

const
  names : array [0..4] of string  = ('ali','samad','kamel','djamel','mustapha');
var
 s : string;
begin
  try
    for s in names do
     Writeln(s);

  except
    on E: Exception do
      Writeln(E.ClassName, ': ', E.Message);
  end;
  readln;
end.