Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];




Вниз

Скан директории на новые файлы 


fliper   (2001-12-26 13:55) [0]

Есть некая программа, которая с неким периодом сбрасывает данные в файл. А после окончания процесса записи закрывает файл. Читаю этот файл, содержащий определенную структуру. Структура заранее известна. Так происходит в ходе каждого процесса. Программа складывает все файлы в один каталог. Файл закрыт и ни одно приложение к нему не обращается. Написал программу, которая берет файл, парсит его и отправляет в базу. А вот как бы мне автоматизировать данный процесс? Т. е., чтобы моя программа смотрела - появился ли новый файл в директории и если появился, то открыть его, парсить и т. д.



Юрий Зотов   (2001-12-26 14:13) [1]

Это несложно. Порождаете TThread с такой схемой Execute:

FindFirstChangeNotification
while not Terminated do
begin
...
FindNextChangeNotification
... // Здесь появился новый файл!
end;
FindCloseChangeNotification



fliper   (2001-12-26 14:18) [2]

биг сэнкс - отличный форум




Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.024 c
3-79293           Dup                   2002-01-31 16:57  2002.02.25  
lookup поле


6-79414           Jaya1                 2001-12-09 16:25  2002.02.25  
---|Ветка была без названия|---


3-79249           Fareader              2002-01-29 15:30  2002.02.25  
Коды ошибок Interbase


3-79272           MVova                 2002-01-30 11:46  2002.02.25  
ADOConnection почему не рвется связь


3-79256           ruslan_as             2002-01-28 10:35  2002.02.25  
InterBase не работает пока не перезапустиш программу