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

Вниз

Определение файла по дате 2   Найти похожие ветки 

 
Grover_11   (2003-08-18 10:31) [0]

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

Я пробовал DateTimeToStr(FileDateTime(FileList.FileName)), но этот способ вряд ли подойдёт. Я даже не представляю, как можно сравнить по дате и найти все файлы новее, чем заданная дата. Те файлы, что окажутся новее нужно занести в FilelistBox. Если можно напишите код.


 
Palladin   (2003-08-18 10:45) [1]

Мне даже жалко тебя...
да как же вас не жалеть...

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

вместо 11 строчки в процедуре напиши:
if ((SearchRec.Attr and faDirectory)<>faDirectory) and
(FileDateToDateTime(SearchRec)>DateCheckPoint) then


где DateCheckPoint:TDateTime - есть нужная тебе контрольная дата


 
Palladin   (2003-08-18 10:50) [2]

FileDateToDateTime(SearchRec .Time)



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

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

Наверх





Память: 0.44 MB
Время: 0.011 c
3-1325
corte ™
2003-08-07 10:01
2003.09.01
Всем привет. Есть ли что то на подобие BatchMove для ADO ??


4-1702
Dan
2003-07-03 16:36
2003.09.01
Подскажите по использованию DrawText


1-1386
AlexLP
2003-08-16 16:55
2003.09.01
Перемещение файлов


1-1448
eXtreme.LIK
2003-08-18 19:12
2003.09.01
Нахождение новейшего файла через FileListBox


3-1296
Nikkkkk
2003-08-11 15:55
2003.09.01
??? !!! Компонент TQuery не поддерживает индексы БД FoxPro!!! ???





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский