Delphi ha mai avuto una per ogni ciclo?

Question

Ho letto che Delphi avrebbe dovuto ottenere un ciclo per ogni ciclo in Delphi 9. Questa funzionalità è mai entrata nella lingua? L'IDE di My Delphi 2009 non sembra riconoscere per ogni sintassi. Ecco il mio codice:

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; 

Answer 1

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; 

Answer 2

Sì.

Ma è for..in

Provate

var 
    s: string; 
    c: char; 

begin 
    s:=' Delphi Rocks!'; 
    for c in s do //<--- here is the interesting part 
    begin 
    Application.MainForm.Caption:=Application.MainForm.Caption+c; 
    Sleep(400); //delay a little to see how it works 
    end;