Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.03.20;
Скачать: CL | DM;

Вниз

Проверка в общем списке файлов файлов с расширением *.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;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.041 c
1-1110102467
leonidus
2005-03-06 12:47
2005.03.20
Знатокам компонента VCLZIP


3-1108631800
AndrewKsionz
2005-02-17 12:16
2005.03.20
Как поместить картинку jpeg в Graphic-поле


1-1109916724
Laymer
2005-03-04 09:12
2005.03.20
Application


4-1108020598
MetalFan
2005-02-10 10:29
2005.03.20
Определить тип запуска сервиса...


14-1109663563
Nikolay M.
2005-03-01 10:52
2005.03.20
Поисковик от разработчиков Рамблера для разработчиков