Согласие на обработку персональных данных.

09.05.2021
Новые видео и статья Ваша первая программа на Python.

03.05.2021
Новый выпуск журнала Автоматизация и Программирование.

28.04.2021
Новые видео и статья Возврат значений через параметры.

26.04.2021
Новые видео и статья Как получить содержимое элемента в JavaScript.

24.04.2021
Новые видео и статья Процедура GetDir.



Раздел: Стандартные функции Паскаля

Процедура GetDir

Процедура GetDir в Паскале возвращает текущий каталог. Синтаксис:

 
procedure GetDir(DriveNR : byte; var Dir : ShortString); overload;

procedure GetDir(DriveNR : byte; var Dir : RawByteString); overload;

procedure GetDir(DriveNR : byte; var Dir : UnicodeString); overload;

Процедура GetDir возвращает текущий каталог диска (полный путь), где DriveNR равен 1 для первого дисковода гибких дисков, 3 - для первого жёсткого диска и т.п. Если этот параметр равен 0, то процедура возвращает каталог на текущем диске.

В системах Linux и Unix параметр DriveNR не учитывается, так как в этих системах существует только одно дерево каталогов.

В DOS процедура возвращает ошибку, если запрошенный диск не готов.

Пример:

program myprog;

var CurrDir : string;

begin
  GetDir(0, CurrDir);
  WriteLn('Current directory is: ');
  WriteLn(CurrDir);

  WriteLn(#10#13'The end. Press ENTER...');
  ReadLn;
end.

В этом примере в глобальную переменную CurrDir мы получаем текущий каталог текущего диска. То есть к каталогу, из которого запущена эта программа.

Вывод будет примерно таким:

Процедура GetDir


Как стать программистом 2.0 Как стать программистом 2.0

Эта книга для тех, кто хочет стать программистом. На самом деле хочет, а не просто мечтает. И хочет именно стать программистом с большой буквы, а не просто научиться кулебякать какие-то примитивные программки… Подробнее...
Инфо-МАСТЕР ®
Все права защищены ©
e-mail: mail@info-master.su

Яндекс.Метрика