كيف استخدام حلقة تكرراية في البحث في جميع المجلدات والمجلدات الفرعية وتعديل اللاحقة

[faiz]

هل يمكن استخدام حلقة تكرراية في هذا  
  [size=small]newName [/size][size=small]:= [/size][size=small]ChangeFileExt[/size][size=small]([/size][size=small]oldName[/size][size=small], [/size][size=small]'.new'[/size][size=small]);[/size]
[size=small]بمعنى [size=small]البحث في جميع المجلدات والمجلدات الفرعية  وتعديل الاحقة [size=small]مثلا من jpg الى ico دون تغير في بنية الصورة او الملف فقط الاسم  مثل الامر ren  في الدوز[/size][/size][/size]

[Samer Assil]

اكيد
استخدم مشابه لهذا

SR: TSearchRec;
if FindFirst('folderPath/*.jpg', faAnyFile or faDirectory, SR) = 0 then
begin
end;
SR سوف تحتوي على بيانات الملف الذي وجده وهل هو مجلد ام ملف
بعدها استبدل الاسماء
RenameFile

[faiz]

مشكور اخي الكريم ولاكن ارجو المزيد من التوضيح والمعذرة منك لكثرة الاسئلة

[Snyder]

مثال عن استعمال FindFirst للبحث في جميع المجلدات