for X in Y do ;

[silvioprog]

Hello,

Would be nice if the PS accepted the new FOR structure of Free Pascal / XE. E.g.:

var
  s: string;
  sl: TStringList;
begin
  sl := TStringList.Create;
  try
    sl.Add('A');
    sl.Add('B');
    sl.Add('C');
    for s in sl do
      WriteLn(s);
  finally
    sl.Free;
  end;
end;

Issued on: http://bugs.freepascal.org/view.php?id=24859

[patrickjmccarty]

Would love this feature. Even more so if it supported iterating COM enumerators/collections. Currently Inno Setup cannot handle COM collections without an external DLL like the one from here: http://www.vincenzo.net/isxkb/index.php?title=WMI#Helper_Library
The zip file there includes the DLL's C++ source code for reference.

[breitsch2]

reform it to:
for it:= 0 to length(y)-1 do begin
x:= y[it];
s := s + IntToHex(x,2);
end;