Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.10.31;
Скачать: [xml.tar.bz2];

Вниз

Удаление файлов по маске   Найти похожие ветки 

 
zero-g ©   (2004-10-19 08:51) [0]

Доброго времени суток :)

У меня такой вопрос. как можно сделать программно. Удаление файлов по маске. Т.е. есть каталог, из него надо все выкинуть.
Например Erase(f) выкидывает только один файл, а как сделать чтоб удолялось по маске???????


 
Yanis ©   (2004-10-19 09:06) [1]

Надеюсь не надо объяснять как просканить каталог?
Тогда

uses
 ..., Masks;

...
begin
...
if MatchesMask(Filename,"*.htm*") then
 DeleteFile(FileName);
end;


 
zero-g ©   (2004-10-19 09:24) [2]

чето я не понял...
а в чем смысл....
если я буду сканировать каталог, то смысл в маске.....
можно ж просто все файлы потом выкинуть, которые найдет...
а нельзя ли просто сделать, например как в досе del *.*
если можно, объясните.... пожалуйста... я не понял


 
zero-g ©   (2004-10-19 09:27) [3]

и если можно, как просканирывать каталог ???


 
begin...end ©   (2004-10-19 10:26) [4]


> [3] zero-g ©   (19.10.04 09:27)

> и если можно, как просканирывать каталог ???

http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=1015254946&n=19


 
Jay   (2004-10-19 10:36) [5]

Попробуй WinExec("del Путь к папке\*.*", SW_HIDE)



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2004.10.31;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.036 c
3-1096646480
Slaga
2004-10-01 20:01
2004.10.31
Мне нужно в ДатаСете перейти на определенную порядковую позицию (


3-1096897477
sloug
2004-10-04 17:44
2004.10.31
TDBRichEdit ошибка


4-1095974476
dms_main
2004-09-24 01:21
2004.10.31
Панель задач


14-1097557906
RavenD
2004-10-12 09:11
2004.10.31
кто юзал TdxDBTreeList ?


3-1096696321
kaginava
2004-10-02 09:52
2004.10.31
Ошибка при выполнени запроса на вставку записей





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский