Dateien umbenennen mit unbekannten Parametern

[delphi-n]

ich hab eine while-schleife eingebaut:

Delphi-Quellcode:

i:=0;
while i<ListBox1...Count do

ChangeFileExt(Form3.ListBox1.Items.Strings[i], Edit2.Text);
i:=i+1;

end;