Форум: "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.013 c
1-79378           tovSuhov              2002-02-08 16:36  2002.02.25  
ProgressBar в StatusBar`е...


14-79437          XeN                   2002-01-06 01:46  2002.02.25  
command line


3-79262           kay                   2002-01-30 08:47  2002.02.25  
BDE Admin


3-79283           niks                  2002-01-29 16:18  2002.02.25  
Вопрос по bcp (BULK INSERT ) MS SQL 2000


1-79311           Yaro                  2002-02-07 11:59  2002.02.25  
Установка обработчика событий