AVZ 5. Руководство пользователя
×
Меню
Индекс

16.21.4. procedure SysCleanGetFilesList

procedure SysCleanGetFilesList(AFileList : TStringList);
 
Возвращает список удаленных файлов (а так-же файлов, добавленных в список удаленных принудительно командами SysCleanAddFile) в массиве строк AFileList. Массив строк должен быть предварительно инициализирован. Данная функция может применяться для реализации собственных процедур эвристической чистки для удаленных скриптом файлов.
 
 
Совместимость:
Версия 4.34 и выше
 
Пример:
 
var
  FileList : TStringList;
  i : integer;
begin
  // Удаление файлов
  DeleteFile('c:\test1.txt');
  DeleteFile('c:\test2.txt');
  // Запрос списка файлов
  FileList := TStringList.Create;
  SysCleanGetFilesList(FileList);
  for i := 0 to FileList.Count-1 do
    AddToLog(FileList[i]);
  FileList.Free;
end.