java - 有没有办法在 delphi(Pascal 对象)中像在 java 中那样为每个对象创建一个？

Question

我今天开始学习 delphi。我想知道是否有一种方法可以使用 for each with objects array 在 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.