Курсовые работы, лабораторные и дипломы по информатике.

>> Справочник по функциям Turbo Pascal 7.0.

Наши спонсоры:

Функция FileSearch.

  • Объявление:

    Function FileSearch(Dest, Name, DirList : PChar) : PChar;

  • Описание:

    Ищет файл.

  • Замечания:

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

  • Пример:

    { Пример программы для функции FileSearch }
    Uses WinCrt, WinDos;
    Var S : Array [0..fsPathName] Of Char;
    Begin
    FileSearch(S, 'TPW.EXE', GetEnvVar('PATH'));
    If S[0] = #0 Then WriteLn('TPW.EXE не найден!')
    Else WriteLn('Найден как ', FileExpand(S, S));
    End.



Вернуться к оглавлению справочника