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

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

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

Процедура GetDir.

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

    Procedure GetDir(D : Byte; Var S : String);

  • Описание:

    Возвращает текущий каталог заданного диска.

  • Замечания:

    Параметр D:
    0 - Текущий диск
    1 - Диск A
    2 - Диск B
    3 - Диск C
    И так далее...

    Не выполняет проверку ошибок. Если диск, заданный параметром D недопустим, то в строке S возвращается X:\, как будто это корневой каталог недопустимого диска.

    Процедура GetCurDir выполняет ту же функцию, что и GetDir, но в качестве одного из параметров используется строка с нулевым окончанием, вместо строки стиля Pascal.

  • Пример:

    { Пример программы для процедуры GetDir }
    Uses WinCrt;
    Var S : String;
    Begin
    GetDir(0, S); { 0 - Текущий диск }
    WriteLn('Текущие диск и директория : ', S);
    End.



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