Форум: "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.71 MB
Время: 0.048 c
14-79442          sudiv                 2002-01-05 16:07  2002.02.25  
Нужна схема к Smart UPS 600? Поможите если есть у кого?


1-79309           Андре                 2002-02-07 15:27  2002.02.25  
Компоненты


1-79314           IronHawk              2002-02-06 18:14  2002.02.25  
Данные из QuickReport.Preview сохранять в *.dbf или *.db файл !!!


14-79475          Alexey(Me)            2002-01-05 11:11  2002.02.25  
Comp. фирма


1-79383           il2                   2002-02-07 14:57  2002.02.25  
MDIChildren