FoxVID |
Отправлено: 29.03.2004, 12:17 |
|

Ученик-кочегар
Группа: Участник
Сообщений: 29

|
Папка содержит файлы. Как программно поменять ее название? |
 |
Gedeon |
Отправлено: 29.03.2004, 13:10 |
|

Ветеран
Группа: Модератор
Сообщений: 1742

|
CODE |
#include <stdio.h>
AnsiString Old="C:\1";
AnsiString New="C:\2";
rename(Old.c_str(),New.c_str()); |
Отредактировано Gedeon — 29/03/2004, 14:13
|
 |
FoxVID |
Отправлено: 29.03.2004, 14:05 |
|

Ученик-кочегар
Группа: Участник
Сообщений: 29

|
Большое спасибо. Это намного проще, чем я делал, используя SHFileOperation |
 |
FoxVID |
Отправлено: 29.03.2004, 14:47 |
|

Ученик-кочегар
Группа: Участник
Сообщений: 29

|
И еще вопрос. А как получить список папок в конкретной директории? |
 |
FoxVID |
Отправлено: 29.03.2004, 15:11 |
|

Ученик-кочегар
Группа: Участник
Сообщений: 29

|
Нашел!!!
CODE |
String DirName=DirectoryListBox1->Directory;
TSearchRec sr;
if (DirName.Length())
{
if (!FindFirst(DirName+"\\*.*",faAnyFile,sr))
do
{
if (!(sr.Name=="." || sr.Name==".."))// это не нужно
{
if (((sr.Attr & faDirectory) == faDirectory ) ||
(sr.Attr == faDirectory))// найдена папка
{
Memo1->Lines->Add(DirName+"\\"+sr.Name);
}
}
}
while (!FindNext(sr));// ищем опять, пока не найдем все
FindClose(sr);
}
| |
 |