function  GetScanPath

Наверх  Назад  Вперед |

function  GetScanPath:string

 

Возвращает список сканируемых папок. Если задано сканирование нескольких папок, то они разделяются точкой с запятой.

 

Пример:

 

var

 s : string;

begin

 setupavz('scan=c:\Program Files');

 setupavz('scan=c:\windows');

 addtolog('Сканируются: ' + GetScanPath);

 // Выделение первого сканируемого каталога

 s := GetScanPath;

 if pos(';', s) > 0 then 

  s := copy(s, 1, pos(';', s) - 1);

 addtolog('Первая сканируемая папка = ' + s);

end.