Форум: "Начинающим";
Текущий архив: 2007.06.17;
Скачать: [xml.tar.bz2];
Вниз
Как удалить старые файлы? Найти похожие ветки
← →
Garacio © (2007-05-24 11:52) [0]В каталоге с программой я храню отчёты в txt по дням:
12.05.2007.txt
13.05.2007.txt
14.05.2007.txt
...
Как (при закрытии программы) сделать так, чтобы файлы с датой в названии, на более чем 40 дней отличающиеся от текущей, удалялись?
← →
clickmaker © (2007-05-24 11:59) [1]FindFirst - FindNext, TSearchRec.Time, DeleteFile()
← →
Garacio © (2007-05-24 12:08) [2]Ну TSearchRec.Time мне не к чему! - Даты буду брать из названий.
А как даты стравнить? (без времени)
← →
Desdechado © (2007-05-24 12:11) [3]Date() - StrToDate( имя файла ) > 40
← →
ЮЮ © (2007-05-24 12:14) [4]Приобразрвать строку "12.05.2007" в TDateTime (а это уже число, не то что на календаре, а несклько тысяч с хвостиком от одной даты на календаре). Его можно будет сравнивать (вычитатать и складывать) с другим числом, получаемым, например, функцией Date() (Или что ты там используешь, давая файлу столь экзотическое имя)
← →
Garacio © (2007-05-24 12:18) [5]Спасибо!
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2007.06.17;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.039 c
