Удаление текущего (выбранного) каталога

The_Immortal · Регистрация: 04.04.2009

Студворк — интернет-сервис помощи студентам

Ребят, возникла следующая проблема.
Работаю с реальной файловой системой, использую компонент DirectoryListBox. Необходимо удалять выбранный каталог, но ничего не выходит - просто ничего не происходит...( Вроде бы все логично прописано... В чем может быть трабла? Посмотрите, пожалуйста...

C++
1
2
3
4
5
6
7
8
9
10
11
12
void __fastcall TForm1::RemoveDir(TObject *Sender){
 
      char current_dir[MAXPATH];    // Константа MAXPATH задает максимальный размер пути для каталога
      getcwd (current_dir, MAXPATH);                // Запоминаем текущий каталог
      // Для удаления каталога
      // возвращаемся в каталог более высокого уровня
      chdir (current_dir);
      rmdir (current_dir);
 
 
      DirectoryListBox1->Update();
}

sh4d°_°ff · 26.11.2009, 18:13

AFAIR сперва необходимо из каталога удалить все файлы...возможно в этом проблема? функцию кинуть?

Добавлено через 1 минуту

C++
1
2
3
4
5
6
7
8
9
10
11
12
void MyDelete (AnsiString Dir, AnsiString tmp)
{
TSearchRec SR;
int ires;
ires = FindFirst(Dir + tmp, faAnyFile, SR);
while (ires==0)
    {
    DeleteFile(Dir + SR.Name);
    ires=FindNext(SR);
    }
FindClose(SR);
}

сперва надо сделать
MyDelete(путь к папке, "*.*");
а потом уже
RmDir();

The_Immortal · 26.11.2009, 20:11 **[ТС]**

sh4d°_°ff, выдает следующую ошибку на 8ую строчку: [C++ Error] Unit1.cpp(713): E2085 Invalid pointer addition

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
void __fastcall TForm1::RemoveDir(TObject *Sender){
 
      char current_dir[MAXPATH];    // Константа MAXPATH задает максимальный размер пути для каталога
      getcwd (current_dir, MAXPATH);                // Запоминаем текущий каталог
      char *tmp ="*.*";
      TSearchRec SR;
      int ires;
      ires = FindFirst(current_dir + tmp, faAnyFile, SR);
      while (ires==0)
        {
        DeleteFile(current_dir + SR.Name);
        ires=FindNext(SR);
        }
      FindClose(SR);
 
      rmdir (current_dir);
 
      DirectoryListBox1->Update();
 
}

sh4d°_°ff · 26.11.2009, 20:20

а зачем так то?

МуДелет

void MyDelete (AnsiString Dir, AnsiString tmp)
{
TSearchRec SR;
int ires;
ires = FindFirst(Dir + tmp, faAnyFile, SR);
while (ires==0)
{
DeleteFile(Dir + SR.Name);
ires=FindNext(SR);
}
FindClose(SR);
}

в *.h файл в секцию private, а потом уже в cpp где угодно подряд...

MyDelete(путь к папке, "*.*");
RmDir();

да ИМО для пути лучше использовать AnsiString (по крайней мере у меня так сделано и все робит)

з.ы.: кстати #include <dir.h>!!!

The_Immortal · 26.11.2009, 20:47 **[ТС]**

sh4d°_°ff, сделал как вы сказали... Дело в том что функция, которая получает текущий каталог (getcwd), работает только с чаром... Ну я вроде конвертирую Энси в чар с по. c_str() и все равно ругается (22ая строчка):
[C++ Error] Unit1.cpp(750): E2294 Structure required on left side of . or .*

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
void MyDelete (AnsiString Dir, AnsiString tmp)
{
TSearchRec SR;
int ires;
ires = FindFirst(Dir + tmp, faAnyFile, SR);
while (ires==0)
{
DeleteFile(Dir + SR.Name);
ires=FindNext(SR);
}
FindClose(SR);
}
 
 
 
 
void __fastcall TForm1::Button13Click(TObject *Sender){
 
 
      DirectoryListBox1->Update();
      AnsiString current_dir[MAXPATH];
      getcwd (current_dir.c_str(), MAXPATH);
      MyDelete(current_dir,"*.*");
      RmDir(current_dir);
 
}

Добавлено через 10 минут
Вот попробовал иначе, вроде без ошибок, но RmDir опять-таки ничего не удаляет..

C++
1
2
3
4
5
6
7
8
9
void __fastcall TForm1::Button13Click(TObject *Sender){
      char current_dir[MAXPATH];
      getcwd (current_dir, MAXPATH);
      String d = AnsiString(current_dir);
      MyDelete(d,"*.*");
      RmDir(d);
      DirectoryListBox1->Update();
 
}

sh4d°_°ff · 26.11.2009, 21:06

C++
1
2
3
4
5
6
7
8
9
10
11
12
      DirectoryListBox1->Update();
      char current_dir[MAXPATH];    // Êîíñòàíòà MAXPATH çàäàåò ìàêñèìàëüíûé ðàçìåð ïóòè äëÿ êàòàëîãà
      getcwd (current_dir, MAXPATH);                // Çàïîìèíàåì òåêóùèé êàòàëîã
      // Äëÿ óäàëåíèÿ êàòàëîãà
      // âîçâðàùàåìñÿ â êàòàëîã áîëåå âûñîêîãî óðîâíÿ
      DirectoryListBox1->Update();
      AnsiString S=DirectoryListBox1->Directory;
      MyDelete(S+"\\","*.*");
      chdir (current_dir);
      DirectoryListBox1->Update();
      RmDir(S);
      DirectoryListBox1->Update();

вот так чистит но не удаляет саму папку, надо подумать еще....

Добавлено через 5 минут
вот рабочий код:

C++
1
2
3
4
5
      AnsiString S=DirectoryListBox1->Directory;
      DirectoryListBox1->ItemIndex=DirectoryListBox1->ItemIndex-1;
      DirectoryListBox1->OpenCurrent();
      MyDelete(S+"\\","*.*");
      RmDir(S);

The_Immortal · 28.11.2009, 12:45 **[ТС]**

sh4d°_°ff, огромнейшее спасибо! Очень помог!

@4aynik · 21.12.2009, 15:26

C++
1
S=DirectoryListBox1->Directory;

Это действие выполняет присвоение текущей папки переменной S?

sh4d°_°ff · 21.12.2009, 15:29

Да

@4aynik · 21.12.2009, 15:41

C++
1
2
3
4
5
AnsiString S=DirectoryListBox1->Directory;                           //присваивает текущую папку  
DirectoryListBox1->ItemIndex=DirectoryListBox1->ItemIndex-1;//делает число папок на одну меньше
DirectoryListBox1->OpenCurrent();                                      //открывает текущую папку
MyDelete(S+"\\","*.*");                                                     //удаляет текущую папку
RmDir(S);                                                                        //а это что делает?

sh4d°_°ff · 21.12.2009, 16:36

не так

C++
1
2
3
4
5
6
1
AnsiString S=DirectoryListBox1->Directory;                           //присваивает текущую папку  
DirectoryListBox1->ItemIndex=DirectoryListBox1->ItemIndex-1;//выбирает предыдущую папку
DirectoryListBox1->OpenCurrent();                                      //открывает ее
MyDelete(S+"\\","*.*");                                                     //чистит текущую папку (удаляет все из нее)
RmDir(S);                                                                        //удаляет саму текущую папку

@4aynik · 22.12.2009, 15:44

Можно ли программно переменной задать конкретный путь к папке? То есть что то например C:\Test\First

sh4d°_°ff · 22.12.2009, 15:48

конечно можно.. только ты имеешь ввиду задать для компонента или для перевенной (или еще для чего)?... короче она должна быть типа String/AnsiString и иметь вид "C:\\Test\\First"

@4aynik · 22.12.2009, 16:02

Имею ввиду так:

C++
1
AnsiString G="C:\\Test\\First";

=======================================

C++
1
2
AnsiString S="C:\\TEST\\ERT";
RmDir(S);

Не удаляет заданную папку... ааа надо сначала очистить содержимое этой папки?

sh4d°_°ff · 22.12.2009, 16:09

да сперва надо сделать

C++
1
MyDelete(S+"\\","*.*");

@4aynik · 23.12.2009, 13:16

Так, точно надо сначала содержимое папки очищать. Получилось. Теперь надо заценить, удалит ли пустую папку...

Всё работает! Спасибо!

Добавлено через 24 минуты
А вот папку C:\\Documents and Settings\\scanman\\Local Settings\\History не хочет очищать...

Добавлено через 20 часов 39 минут
Папку эту History очищает, но остаётся вот такая директория - History.IE5
В ней в основном файлы index.dat... Их нельзя удалить?

Новые блоги и статьи Все статьи Все блоги /
Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ	Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .	Горе от ума kumehtar 07.04.2026 Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .

sh4d°_°ff говнокодер 1273 / 297 / 35 Регистрация: 31.10.2009 Сообщений: 1,432
	26.11.2009, 20:20
	а зачем так то? МуДелет void MyDelete (AnsiString Dir, AnsiString tmp) { TSearchRec SR; int ires; ires = FindFirst(Dir + tmp, faAnyFile, SR); while (ires==0) { DeleteFile(Dir + SR.Name); ires=FindNext(SR); } FindClose(SR); } в .h файл в секцию private, а потом уже в cpp где угодно подряд... MyDelete(путь к папке, ".*"); RmDir(); да ИМО для пути лучше использовать AnsiString (по крайней мере у меня так сделано и все робит) з.ы.: кстати #include <dir.h>!!! 0

The_Immortal 1569 / 505 / 48 Регистрация: 04.04.2009 Сообщений: 1,891
	28.11.2009, 12:45 [ТС]
	sh4d°_°ff, огромнейшее спасибо! Очень помог! 0

sh4d°_°ff говнокодер 1273 / 297 / 35 Регистрация: 31.10.2009 Сообщений: 1,432
	21.12.2009, 15:29
	Да 0

@4aynik 0 / 0 / 0 Регистрация: 17.08.2009 Сообщений: 161
	22.12.2009, 15:44
	Можно ли программно переменной задать конкретный путь к папке? То есть что то например C:\Test\First 0

sh4d°_°ff говнокодер 1273 / 297 / 35 Регистрация: 31.10.2009 Сообщений: 1,432
	22.12.2009, 15:48
	конечно можно.. только ты имеешь ввиду задать для компонента или для перевенной (или еще для чего)?... короче она должна быть типа String/AnsiString и иметь вид "C:\\Test\\First" 0

@4aynik 0 / 0 / 0 Регистрация: 17.08.2009 Сообщений: 161
	23.12.2009, 13:16
	Так, точно надо сначала содержимое папки очищать. Получилось. Теперь надо заценить, удалит ли пустую папку... Всё работает! Спасибо! Добавлено через 24 минуты А вот папку C:\\Documents and Settings\\scanman\\Local Settings\\History не хочет очищать... Добавлено через 20 часов 39 минут Папку эту History очищает, но остаётся вот такая директория - History.IE5 В ней в основном файлы index.dat... Их нельзя удалить? 0