Сканирование программой папки. Delphi

[DerSky]

Доброго веремени суток.
Мне нужно что бы моя программа, постоянно сканировала определенную папку, может мне кто-нибудь подсказать как это организовать?
А если бы написали пример был бы вообще очень благодарен

З.Ы. программа должна сканировать папку на наличие определенного текстового файла, например text.txt

[Kashp]

Сообщение от DerSky

Доброго веремени суток.
Мне нужно что бы моя программа, постоянно сканировала определенную папку, может мне кто-нибудь подсказать как это организовать?
А если бы написали пример был бы вообще очень благодарен

З.Ы. программа должна сканировать папку на наличие определенного текстового файла, например text.txt

Кидаем на форму таймер и прописываем:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
 if FileExistc ('d:\text.txt') then // Если файл есть тогда
...                                       // Выполнить нужное действие
end;

[DerSky]

Сообщение от Kashp

Кидаем на форму таймер и прописываем:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
 if FileExistc ('d:\text.txt') then // Если файл есть тогда
...                                       // Выполнить нужное действие
end;

Большое спасибо за помосчь