
// Сканируем каталог, при обновлениях в нем запускаем скрипты


var FileNameList :string; // задается приложением
var Aliasname :string ; // имя настройки
var DirName :string; // Имя базового каталога, в котором происходит поиск


var
  WF :TMyWait;
begin
  STDInOutReadFile(DirName,now()-14,0);
  //CreateHInt(FileNameList+':'+DirName+':'+AliasName,'Сменились данные',0);

end.
