delphi4arab منتديات دلفي للعرب

هل يمكن استخدام حلقة تكرراية في هذا  
  [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]

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

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

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

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