Не удаляются log файлы

@Zeausheveu · Регистрация: 06.12.2014

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

Не удаляет

C++
1
DeleteFile("*.log");

Удаляет

C++
1
2
3
DeleteFile("name1.log");
DeleteFile("name2.log");
DeleteFile("name3.log");

Нужно удалить только log файлы,а остальные нельзя трогать! Файлов много, как это можно сделать?
Прописать каждое имя не вариант

@Zeausheveu · 07.12.2014, 21:14 **[ТС]**

Ошибки

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\wi ndows\vcl";"c:\program files (x86)\embarcadero\studio\15.0\include";" c:\program files
(x86)\embarcadero\studio\15.0\include\di nkumware";"c:\program files (x86)\embarcadero\studio\15.0\include\wi ndows\crtl";"c:\program files
(x86)\embarcadero\studio\15.0\include\wi ndows\sdk";"c:\program files (x86)\embarcadero\studio\15.0\include\wi ndows\rtl";"c:\program files
(x86)\embarcadero\studio\15.0\include\wi ndows\vcl";"c:\program files (x86)\embarcadero\studio\15.0\include\wi ndows\fmx";"C:\Program Files
(x86)\FastReports\LibD21";"C:\Program Files (x86)\Raize\CS5\Lib\RS-XE7\Win32";C:\Users\Public\Documents\Emb arcadero\Studio\15.0\hpp\Win32 -y -Q -k
-r- -c -tR -tM -tW -C8 -o.\Win32\Debug\Unit1.obj -w-par -Od -v -vi- -H=.\Win32\Debug\Project1.pch -H Unit1.cpp
[bcc32 Error] Unit1.cpp(72): E2034 Cannot convert 'wchar_t *' to 'const char *'
Full parser context
Unit1.cpp(60): parsing: void _fastcall TForm1::Timer1Timer(TObject *)
[bcc32 Error] Unit1.cpp(72): E2342 Type mismatch in parameter '__src' (wanted 'const char *', got 'wchar_t *')
Full parser context
Unit1.cpp(60): parsing: void _fastcall TForm1::Timer1Timer(TObject *)
[bcc32 Error] Unit1.cpp(96): E2040 Declaration terminated incorrectly
[bcc32 Error] Unit1.cpp(102): E2190 Unexpected }
Failed
Elapsed time: 00:00:01.2

@D1973 · 07.12.2014, 21:26

А билдер-то какой?
Ага, уже понял... Тогда так.

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
#include <tchar.h>
...
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  String Dir1 = "C:\\Name\\TempFile\\";
  String Dir2 = "C:\\Name\\Logs\\";
  if(DirectoryExists(Dir1))
   {
     TCHAR cDest[MAX_PATH] = {0};
     _tcscpy(cDest,Dir1.c_str());
     SHFILEOPSTRUCT fos;
     memset(&fos, 0, sizeof(SHFILEOPSTRUCT));
     fos.hwnd = Application->Handle;
     fos.wFunc = FO_DELETE;
     fos.pFrom = cDest;
     fos.fFlags = FOF_SILENT | FOF_NOERRORUI | FOF_NOCONFIRMATION;
     SHFileOperation(&fos);
   }
  TSearchRec SR;
  ChDir(Dir2);
  if(FindFirst("*.log", faAnyFile, SR) == 0)
   {
     do
       DeleteFile(SR.Name);
     while (FindNext(SR) == 0);
     FindClose(SR);
   }
  ChDir(ExtractFilePath(Application->ExeName));
}

@Zeausheveu · 07.12.2014, 21:43 **[ТС]**

Сообщение от D1973

А билдер-то какой?

C++ Builder XE7, на нем все проекты работают

Опять ошибки

В свойствах проекта 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\wi ndows\vcl";"c:\program files (x86)\embarcadero\studio\15.0\include";" c:\program files
(x86)\embarcadero\studio\15.0\include\di nkumware";"c:\program files (x86)\embarcadero\studio\15.0\include\wi ndows\crtl";"c:\program files
(x86)\embarcadero\studio\15.0\include\wi ndows\sdk";"c:\program files (x86)\embarcadero\studio\15.0\include\wi ndows\rtl";"c:\program files
(x86)\embarcadero\studio\15.0\include\wi ndows\vcl";"c:\program files (x86)\embarcadero\studio\15.0\include\wi ndows\fmx";"C:\Program Files
(x86)\FastReports\LibD21";"C:\Program Files (x86)\Raize\CS5\Lib\RS-XE7\Win32";C:\Users\Public\Documents\Emb arcadero\Studio\15.0\hpp\Win32 -y -Q -k
-r- -c -tR -tM -tW -C8 -o.\Win32\Debug\Unit1.obj -w-par -Od -v -vi- -H=.\Win32\Debug\Project1.pch -H Unit1.cpp
[bcc32 Error] Unit1.cpp(72): E2034 Cannot convert 'wchar_t *' to 'const char *'
Full parser context
Unit1.cpp(61): parsing: void _fastcall TForm1::Timer1Timer(TObject *)
[bcc32 Error] Unit1.cpp(72): E2342 Type mismatch in parameter '__src' (wanted 'const char *', got 'wchar_t *')
Full parser context
Unit1.cpp(61): parsing: void _fastcall TForm1::Timer1Timer(TObject *)
Failed
Elapsed time: 00:00:00.1

@D1973 · 07.12.2014, 21:51

Ну так поставь в свойствах проекта _TCHAR maps to == wchar_t

@Zeausheveu · 07.12.2014, 22:09 **[ТС]**

Сообщение от D1973

Ну так поставь в свойствах проекта _TCHAR maps to == wchar_t

проект не будет компилироваться

Добавлено через 12 секунд
уже пробовал

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

C++
1
char*

Добавлено через 13 минут
И как исправить ?

@D1973 · 07.12.2014, 22:10

Вот ты один такой особенный, что у всех компилируется, у тебя нет...

@Zeausheveu · 07.12.2014, 22:21 **[ТС]**

Сообщение от D1973

Вот ты один такой особенный, что у всех компилируется, у тебя нет...

D1973 вы мне говорите выставить вот:"wchar_t" тогда проект вообще никак не компилирует хоть с ваши кодом и без него тоже самое

А вот когда выставлен char
Без вашего кода компилируется
С вашим нет

@D1973 · 08.12.2014, 05:34

Полностью проект высылай. Посмотрю, что там может не компилироваться...

@Zeausheveu · 08.12.2014, 09:05 **[ТС]**

Сообщение от D1973

Полностью проект высылай. Посмотрю, что там может не компилироваться...

Исходники не мои они с этого форума!
Я к ним пытаюсь "прикрутить" ваш код

Узнать запущен ли процесс и выполнить действие
Не компилируется программа [bcc32 Error]

@demmax2004 · 08.12.2014, 10:11

Убери уже все char у себя в проекте, поставь wchar_t, и в настройках проекта выстави wchar_t
Вместо AnsiString поставь UnicodeString
вместо strcmp поставь lstrcmp

@Zeausheveu · 08.12.2014, 12:17 **[ТС]**

Сообщение от demmax2004

Убери нахрен уже все char у себя в проекте, поставь wchar_t, и в настройках проекта выстави wchar_t
Вместо AnsiString поставь UnicodeString
вместо strcmp поставь lstrcmp

Не помогло !

@demmax2004 · 08.12.2014, 12:44

что не помогло ???? у меня лично компилируется.

@Zeausheveu · 08.12.2014, 12:56 **[ТС]**

Сообщение от demmax2004

у меня лично компилируется.

Как сделать ?
У меня не получилось!

Добавлено через 5 минут
Checking project dependencies...
Compiling Project1.cbproj (Debug, Win32)
bcc32 command line for "Project1.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\wi ndows\vcl";"c:\program files (x86)\embarcadero\studio\15.0\include";" c:\program files
(x86)\embarcadero\studio\15.0\include\di nkumware";"c:\program files (x86)\embarcadero\studio\15.0\include\wi ndows\crtl";"c:\program files
(x86)\embarcadero\studio\15.0\include\wi ndows\sdk";"c:\program files (x86)\embarcadero\studio\15.0\include\wi ndows\rtl";"c:\program files
(x86)\embarcadero\studio\15.0\include\wi ndows\vcl";"c:\program files (x86)\embarcadero\studio\15.0\include\wi ndows\fmx";"C:\Program Files
(x86)\FastReports\LibD21";"C:\Program Files (x86)\Raize\CS5\Lib\RS-XE7\Win32";C:\Users\Public\Documents\Emb arcadero\Studio\15.0\hpp\Win32 -y -Q -k
-r- -c -tR -tM -tU -tW -C8 -o.\Win32\Debug\Project1.obj -w-par -Od -v -vi- -H=.\Win32\Debug\Project1.pch -H Project1.cpp
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\wi ndows\vcl";"c:\program files (x86)\embarcadero\studio\15.0\include";" c:\program files
(x86)\embarcadero\studio\15.0\include\di nkumware";"c:\program files (x86)\embarcadero\studio\15.0\include\wi ndows\crtl";"c:\program files
(x86)\embarcadero\studio\15.0\include\wi ndows\sdk";"c:\program files (x86)\embarcadero\studio\15.0\include\wi ndows\rtl";"c:\program files
(x86)\embarcadero\studio\15.0\include\wi ndows\vcl";"c:\program files (x86)\embarcadero\studio\15.0\include\wi ndows\fmx";"C:\Program Files
(x86)\FastReports\LibD21";"C:\Program Files (x86)\Raize\CS5\Lib\RS-XE7\Win32";C:\Users\Public\Documents\Emb arcadero\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(37): E2034 Cannot convert 'char const[5]' to 'const wchar_t *'
Full parser context
Unit1.cpp(35): parsing: void _fastcall TForm1::Button1Click(TObject *)
[bcc32 Error] Unit1.cpp(37): E2342 Type mismatch in parameter 'lpOperation' (wanted 'const wchar_t *', got 'const char *')
Full parser context
Unit1.cpp(35): parsing: void _fastcall TForm1::Button1Click(TObject *)
[bcc32 Error] Unit1.cpp(50): E2034 Cannot convert 'wchar_t *' to 'const char *'
Full parser context
Unit1.cpp(41): parsing: bool IsProcessRun(char *)
[bcc32 Error] Unit1.cpp(50): E2342 Type mismatch in parameter '__s1' (wanted 'const char *', got 'wchar_t *')
Full parser context
Unit1.cpp(41): parsing: bool IsProcessRun(char *)
[bcc32 Error] Unit1.cpp(64): E2034 Cannot convert 'char *' to 'wchar_t *'
Full parser context
Unit1.cpp(61): parsing: void _fastcall TForm1::Timer1Timer(TObject *)
[bcc32 Error] Unit1.cpp(65): E2034 Cannot convert 'wchar_t *' to 'char *'
Full parser context
Unit1.cpp(61): parsing: void _fastcall TForm1::Timer1Timer(TObject *)
[bcc32 Error] Unit1.cpp(65): E2342 Type mismatch in parameter 'pName' (wanted 'char *', got 'wchar_t *')
Full parser context
Unit1.cpp(61): parsing: void _fastcall TForm1::Timer1Timer(TObject *)
Failed
Elapsed time: 00:00:00.1

@demmax2004 · 08.12.2014, 13:03

Внимательно перечитай пост №32 и сделай как там написано, и ошибки уйдут, это на 10000%

@Zeausheveu · 08.12.2014, 13:17 **[ТС]**

Сообщение от demmax2004

Внимательно перечитай пост №32

Читал всё и делал по инструкции как надо!
Толку 0!

08.12.2014, 13:26

demmax2004 Пришлите исходники,посмотрю что вы там "исправили"

@gunslinger · 08.12.2014, 14:56

Не могу не высказаться (крик души):

Не по теме:

Мартышкин труд у нас в почете,
Но стоит ль что-то объяснять
Тому, кто ничего не понимает
И вряд ли сможет что-либо понять?

А если по теме: для удаления определенных файлов (в данном случае по расширению) в папке добавляем на форму компонент FileListBox (далее - FLB), задаем директорию в его свойстве Directory, указываем фильтр в Mask (*.log) и проходим по полученному списку [for (int i = 0; i < FLB->Count; i++)], удаляя файлы [Delete(FLB->Directory + "\\" + FLB->Items->Strings[i])]. Просто даже для начинающего (если хотя бы немного котелок варит).

@Zeausheveu · 08.12.2014, 15:51 **[ТС]**

Мне этот проект никак не доделать

@demmax2004 · 08.12.2014, 15:54

Сообщение от Zeausheveu

Читал всё и делал по инструкции как надо!
Толку 0!

Выкладывай свой подправленный проект

@Zeausheveu · 08.12.2014, 16:17 **[ТС]**

Сообщение от demmax2004

Выкладывай свой подправленный проект

Исходник с исправлениями

Новые блоги и статьи Все статьи Все блоги /
Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ" Adler 06.10.2026 Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .

@Zeausheveu 0 / 0 / 0 Регистрация: 06.12.2014 Сообщений: 31
	07.12.2014, 21:14 [ТС]
	Ошибки 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\wi ndows\vcl";"c:\program files (x86)\embarcadero\studio\15.0\include";" c:\program files (x86)\embarcadero\studio\15.0\include\di nkumware";"c:\program files (x86)\embarcadero\studio\15.0\include\wi ndows\crtl";"c:\program files (x86)\embarcadero\studio\15.0\include\wi ndows\sdk";"c:\program files (x86)\embarcadero\studio\15.0\include\wi ndows\rtl";"c:\program files (x86)\embarcadero\studio\15.0\include\wi ndows\vcl";"c:\program files (x86)\embarcadero\studio\15.0\include\wi ndows\fmx";"C:\Program Files (x86)\FastReports\LibD21";"C:\Program Files (x86)\Raize\CS5\Lib\RS-XE7\Win32";C:\Users\Public\Documents\Emb arcadero\Studio\15.0\hpp\Win32 -y -Q -k -r- -c -tR -tM -tW -C8 -o.\Win32\Debug\Unit1.obj -w-par -Od -v -vi- -H=.\Win32\Debug\Project1.pch -H Unit1.cpp [bcc32 Error] Unit1.cpp(72): E2034 Cannot convert 'wchar_t ' to 'const char ' Full parser context Unit1.cpp(60): parsing: void _fastcall TForm1::Timer1Timer(TObject ) [bcc32 Error] Unit1.cpp(72): E2342 Type mismatch in parameter '__src' (wanted 'const char ', got 'wchar_t ') Full parser context Unit1.cpp(60): parsing: void _fastcall TForm1::Timer1Timer(TObject ) [bcc32 Error] Unit1.cpp(96): E2040 Declaration terminated incorrectly [bcc32 Error] Unit1.cpp(102): E2190 Unexpected } Failed Elapsed time: 00:00:01.2 0

@D1973 Модератор 9954 / 6490 / 2461 Регистрация: 21.01.2014 Сообщений: 27,498 Записей в блоге: 3
	07.12.2014, 21:51
	Ну так поставь в свойствах проекта _TCHAR maps to == wchar_t 0

@D1973 Модератор 9954 / 6490 / 2461 Регистрация: 21.01.2014 Сообщений: 27,498 Записей в блоге: 3
	07.12.2014, 22:10
	Вот ты один такой особенный, что у всех компилируется, у тебя нет... Миниатюры 0

@D1973 Модератор 9954 / 6490 / 2461 Регистрация: 21.01.2014 Сообщений: 27,498 Записей в блоге: 3
	08.12.2014, 05:34
	Полностью проект высылай. Посмотрю, что там может не компилироваться... 0

@demmax2004 120 / 142 / 46 Регистрация: 31.10.2014 Сообщений: 721 Записей в блоге: 1
	08.12.2014, 10:11
	Убери уже все char у себя в проекте, поставь wchar_t, и в настройках проекта выстави wchar_t Вместо AnsiString поставь UnicodeString вместо strcmp поставь lstrcmp 0

@demmax2004 120 / 142 / 46 Регистрация: 31.10.2014 Сообщений: 721 Записей в блоге: 1
	08.12.2014, 12:44
	что не помогло ???? у меня лично компилируется. 0

@demmax2004 120 / 142 / 46 Регистрация: 31.10.2014 Сообщений: 721 Записей в блоге: 1
	08.12.2014, 13:03
	Внимательно перечитай пост №32 и сделай как там написано, и ошибки уйдут, это на 10000% 0

Encarolist
	08.12.2014, 13:26
	demmax2004 Пришлите исходники,посмотрю что вы там "исправили"

@gunslinger place status here 3192 / 2227 / 640 Регистрация: 20.07.2013 Сообщений: 6,028
	08.12.2014, 14:56
	Не могу не высказаться (крик души): Не по теме: Мартышкин труд у нас в почете, Но стоит ль что-то объяснять Тому, кто ничего не понимает И вряд ли сможет что-либо понять? А если по теме: для удаления определенных файлов (в данном случае по расширению) в папке добавляем на форму компонент FileListBox (далее - FLB), задаем директорию в его свойстве Directory, указываем фильтр в Mask (*.log) и проходим по полученному списку [for (int i = 0; i < FLB->Count; i++)], удаляя файлы [Delete(FLB->Directory + "\\" + FLB->Items->Strings[i])]. Просто даже для начинающего (если хотя бы немного котелок варит). 0

@Zeausheveu 0 / 0 / 0 Регистрация: 06.12.2014 Сообщений: 31
	08.12.2014, 15:51 [ТС]
	Мне этот проект никак не доделать 0