Форум: "Основная";
Текущий архив: 2005.03.20;
Скачать: [xml.tar.bz2];
ВнизПроверка в общем списке файлов файлов с расширением *.mod Найти похожие ветки
← →
diabolik_krsk (2005-03-09 12:42) [0]Мастера. Следующая проблемка.
В приложении запущен поток на проверку определнной директории на предмет изменения там файлов (добавление, удаление и т.д.).
Как отловить событие это разобрался.
Нужно при изменении файлов проверить в общем списке файлов есть ли файлы с расширением *.mod и если есть занести их в Tlist.
Подскажите как или где почитать... (просьба гнилыми помидорами не кидаться).
← →
Reindeer Moss Eater © (2005-03-09 12:44) [1]if ..... then TList.Add(...)
← →
markers © (2005-03-09 12:45) [2]FindFirst
FindNext
← →
diabolik_krsk (2005-03-09 13:09) [3]Со структурой if ... then это даже без вопросов.
FindFirst и FindNext где то в исходных VCL то же видел (там даже компонент есть FileList на странице WIN 3.1). Проблема в том, что реализовать это, во всяком случае для меня, не так то просто.
Мне поподробнее изложите, если можно. А можно и ссылочкой на статью бросить!!
← →
Zeqfreed © (2005-03-09 13:22) [4]diabolik_krsk (09.03.05 13:09) [3]
Если честно, из [0] я ничего не понял. Что из себя представляет "общий список", с каким событием ты разобрался?
← →
markers © (2005-03-09 13:37) [5]Кусок из реально рабоитающей программы
if FindFirst(ExtractFileDir(Application.ExeName)+"\Data\"+"*.cop", faAnyFile, SearchRec) = 0 then
begin
repeat
Application.ProcessMessages;
if (SearchRec.Name <> "..") and (SearchRec.Name <> ".") then
begin
ReportFile.Add(SearchRec.Name);
end;
until FindNext(SearchRec) <> 0;
FindClose(SearchRec);
end;
Где SearchRec это SearchRec:TSearchRec; в Var
Объясняю: Ищем любые файлы в подпапке программы дата с расширением "cop" если такие имеються добавляем ЫекштпДшые
← →
diabolik_krsk (2005-03-09 13:45) [6]2markers Огромное спасибо. То что нужно!
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2005.03.20;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.048 c