Функция FSearch()

Модуль DOS

Ищет файл.

Объявление:

Function FSearch(Path : PathStr; DirList : String) : PathStr;

Режим:

Real, Protected

Замечание:

Ищет файл в списке каталогов DirList. Каталоги в DirList должны быть разделены точками с запятой.

Пример:

{ Пример программы для FSearch }

Uses Dos;

Var S : PathStr;

Begin
 S:=FSearch('TURBO.EXE', GetEnv('PATH'));
 If S='' Then WriteLn('TURBO.EXE не найден.')
 Else WriteLn('Найден как ',FExpand(S));
End.