Форум программистов, компьютерный форум, киберфорум
C++ Builder
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.91/11: Рейтинг темы: голосов - 11, средняя оценка - 4.91
0 / 0 / 0
Регистрация: 15.09.2014
Сообщений: 4
1

Удаление скрытых файлов

15.09.2014, 19:24. Показов 2273. Ответов 6
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
C++
1
2
3
#include <System.IOUtils.hpp>
if(TDirectory::Exists("%ProgramData%\\MP")) TDirectory::Delete("%ProgramData%\\MP", true);//Папка удаляться даже если в ней есть файлы!
DeleteFile ("%ProgramData%\\*.*");
Простые файлы и папки всё удаляется хорошо
Скрытые папки и файлы вообще ни как не удалить

Как удалить скрытые файлы папки из используя переменные Windows: %AppData%,%ProgramData% ?
Полный путь прописывать к этим папкам не подходит, так как я точно не знаю на каком диске установлена система у пользователя
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
15.09.2014, 19:24
Ответы с готовыми решениями:

Удаление скрытых файлов, расположенных в разных местах.
У меня такая проблема. Недавно на компьютере заметил странный скрытый файл : блокнот конфигурации,...

Поиск файлов на диске, за исключением скрытых файлов и папок
Часть кода, желательно использовать её. DirectoryInfo Di = new DirectoryInfo(@&quot;F:&quot;); foreach...

Отключить отображения расширения файлов и скрытых системных файлов
Как средствами delphi можно отключить отображения расширения файлов и скрытых системных файлов?

Удаление скрытых строк
Добрый день! Как в макросе прописать удаление скрытых строк, не проходя циклом по всем строкам...

6
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
32959 / 21276 / 8169
Регистрация: 22.10.2011
Сообщений: 36,546
Записей в блоге: 8
15.09.2014, 19:55 2
Цитата Сообщение от Tonasulata Посмотреть сообщение
Полный путь прописывать к этим папкам не подходит
Не надо. Есть ExpandEnvironmentStrings из WinAPI, либо GetEnvironmentVariable прямо в модуле SysUtils
1
0 / 0 / 0
Регистрация: 15.09.2014
Сообщений: 4
15.09.2014, 22:15  [ТС] 3
Цитата Сообщение от UI Посмотреть сообщение
Не надо. Есть ExpandEnvironmentStrings из WinAPI, либо GetEnvironmentVariable прямо в модуле SysUtils
Покажите пример

Добавлено через 41 минуту
Как сделать ?
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
32959 / 21276 / 8169
Регистрация: 22.10.2011
Сообщений: 36,546
Записей в блоге: 8
16.09.2014, 00:16 4
Цитата Сообщение от Tonasulata Посмотреть сообщение
Как сделать ?
C++
1
2
3
4
5
6
7
8
    const int BUFFER_SIZE = 4096;
 
    TCHAR buffer[BUFFER_SIZE] = {0};
    ::ExpandEnvironmentStrings(_T("%PROGRAMDATA%"), buffer, BUFFER_SIZE);
 
    String path = String(buffer) + _T("\\MP");
    if (TDirectory::Exists(path))
        TDirectory::Delete(path, true);
И плевать этому коду, Hidden выставлен или снят, что обычные, что скрытые папки прекрасно удаляются. С файлами аналогично...
1
0 / 0 / 0
Регистрация: 15.09.2014
Сообщений: 4
16.09.2014, 11:22  [ТС] 5
Пробовал выставлять в свойствах проекта wchar_t и char
И всё равно ошибки!

Checking project dependencies...
Compiling Project1.cbproj (Debug, Win32)
bcc32 command line for "Unit1.cpp"
c:\program files (x86)\embarcadero\studio\15.0\bin\bcc32.exe -D_DEBUG -DUSEPACKAGES -n.\Win32\Debug -I"c:\program files
(x86)\embarcadero\studio\15.0\include\windows\vcl";"C:\Program Files (x86)\Embarcadero\Studio\15.0\include\boost_1_39\boost\tr1\tr1";"C:\Program
Files (x86)\Embarcadero\Studio\15.0\include\boost_1_39";"c:\program files (x86)\embarcadero\studio\15.0\include";"c:\program files
(x86)\embarcadero\studio\15.0\include\dinkumware";"c:\program files (x86)\embarcadero\studio\15.0\include\windows\crtl";"c:\program files
(x86)\embarcadero\studio\15.0\include\windows\sdk";"c:\program files (x86)\embarcadero\studio\15.0\include\windows\rtl";"c:\program files
(x86)\embarcadero\studio\15.0\include\windows\vcl";"c:\program files (x86)\embarcadero\studio\15.0\include\windows\fmx";"C:\Program Files
(x86)\FastReports\LibD21";"C:\Program Files (x86)\Raize\CS5\Lib\RS-XE7\Win32";C:\Users\Public\Documents\Embarcadero\Studio\15.0\hpp\Win32 -y -Q -k
-r- -c -tR -tM -tU -tW -C8 -o.\Win32\Debug\Unit1.obj -w-par -Od -v -vi- -H=.\Win32\Debug\Project1.pch -H Unit1.cpp
[bcc32 Error] Unit1.cpp(22): E2268 Call to undefined function '_T'
Full parser context
Unit1.cpp(18): parsing: void _fastcall TForm1::Button1Click(TObject *)
[bcc32 Error] Unit1.cpp(22): E2034 Cannot convert 'int' to 'const wchar_t *'
Full parser context
Unit1.cpp(18): parsing: void _fastcall TForm1::Button1Click(TObject *)
[bcc32 Error] Unit1.cpp(22): E2342 Type mismatch in parameter 'lpSrc' (wanted 'const wchar_t *', got 'int')
Full parser context
Unit1.cpp(18): parsing: void _fastcall TForm1::Button1Click(TObject *)
[bcc32 Error] Unit1.cpp(25): E2090 Qualifier 'TDirectory' is not a class or namespace name
Full parser context
Unit1.cpp(18): parsing: void _fastcall TForm1::Button1Click(TObject *)
[bcc32 Error] Unit1.cpp(25): E2377 If statement missing )
Full parser context
Unit1.cpp(18): parsing: void _fastcall TForm1::Button1Click(TObject *)
Failed
Elapsed time: 00:00:00.1
Вложения
Тип файла: rar ошибки.rar (4.03 Мб, 2 просмотров)
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
32959 / 21276 / 8169
Регистрация: 22.10.2011
Сообщений: 36,546
Записей в блоге: 8
16.09.2014, 11:35 6
Цитата Сообщение от Tonasulata Посмотреть сообщение
Call to undefined function '_T'
Очень интересно. Насколько я помню, tchar.h, в котором описан макрос _T, подключается в недрах vcl.h, каким образом он у тебя не подключен - неясно. Попробуй
C++
1
#include <tchar.h>
, либо в самом крайнем случае переключи TCHAR maps to на wchar_t, и вместо _T("Строка") используй L"Строка"
Цитата Сообщение от Tonasulata Посмотреть сообщение
Qualifier 'TDirectory' is not a class or namespace name
Опять же непонятно. Если (как у тебя написано в первом посте) подключен System.IOUtils.hpp, то не может быть, чтобы TDirectory не было известно. Либо у тебя просто какая-то очень глючная версия Билдера...

Все остальные ошибки - наведенные. Исправишь эти две - уйдут остальные...
0
0 / 0 / 0
Регистрация: 15.09.2014
Сообщений: 4
16.09.2014, 14:01  [ТС] 7
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
27
28
29
30
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
#include <System.IOUtils.hpp>
#include <tchar.h>
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
const int BUFFER_SIZE = 4096;
 
    TCHAR buffer[BUFFER_SIZE] = {0};
    ::ExpandEnvironmentStrings(_T("%PROGRAMDATA%"), buffer, BUFFER_SIZE);
 
    String path = String(buffer) + _T("\\Имя нужной папки");
    if (TDirectory::Exists(path))
        TDirectory::Delete(path, true);
}
//---------------------------------------------------------------------------

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
//---------------------------------------------------------------------------
 
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <System.Classes.hpp>
#include <Vcl.Controls.hpp>
#include <Vcl.StdCtrls.hpp>
#include <Vcl.Forms.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:    // IDE-managed Components
    TButton *Button1;
    void __fastcall Button1Click(TObject *Sender);
private:    // User declarations
public:     // User declarations
    __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif
Спасибо за помощь, на RAD Studio XE7 всё работает!

Добавлено через 18 минут
А если несколько папок разных удалять то как ?
Сейчас код удаляет только одну папку
0
16.09.2014, 14:01
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
16.09.2014, 14:01
Помогаю со студенческими работами здесь

Удаление пустых скрытых папок с подпапками
Хочется написать cmd-файл, который при запуске из какой то папки будет пробегаться по всем ее...

Архивация скрытых файлов
Достаточно долго пытаюсь решить данную мне задачу. Но, не получается. В интернете тоже не могу...

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

Отображение скрытых файлов
Здравствуйте. У меня винда 7 домашняя базовая скрыл однажды я один файл, а назад сделать его...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru