| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

удаление файлов [D6]

IGSI ©   (2005-01-11 00:21:00) 

Добрый вечер. Помогите пожалуйста с такой проблемой, я хочу удалить группу определенных файлов. Как мне это сделать миную корзину. (пробовал через функцию Deletefile(), не входит).

---

Anatoly Podgoretsky   (2005-01-11 00:54:00) [1]

ShFileOperation

---

Anonimus   (2005-01-11 00:25:00) [2]

FindFirst+FindNext+

if FileExists(FileName) then
 if MessageDlg ('Do you really want to delete ' + ExtractFileName(FileName) + '?'), mtConfirmation, [mbYes, mbNo], 0, mbNo) = IDYes then
   DeleteFile(FileName);

---

Наверх