Скачать: CL | DM;

Как переиминовать все файлы в папке?   Найти похожие ветки 

← →
dars73 ©   (2004-05-15 00:39) [0]

Как я могу поочередно просмотреть имена файлов в папке и переименовать из по своему усмотрению?
заранее благодарен за помощ.

---

← →
Style ©   (2004-05-15 00:43) [1]

FindFirst
FindNext
RenameFile - F1

---

← →
dars73 ©   (2004-05-15 00:54) [2]

Да но я совсем еще новичек. Где можно посмотреть пример???

---

← →
AlexZ_CRC ©   (2004-05-15 12:44) [3]

Style
Ну разве ему так понятно будет? Ты этих АПИ параметры сказал хотябы.

//---------------
// Вставить в процу до "Begin"
var H:THandle;
   F:TWin32FindData;
//---------------
// Вставить в процу (здесь ищем файл)
 H:=FindFirstFile (Edit1.Text, F);
 // В Edit1.Text имя и путь к файлу
 // Здесь код переименования (думаю он в справке будет)
 FindClose(H); // После всей мороки, освободи память!
//---------------

Не густо, но пригодится, надеюсь.
А пример в хелпе по ВинАПИ подглядеть можно :)

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.039 c