Функция GetCurrentDir в Delphi возвращает текущий каталог (диск плюс каталог).
SysUtils unit
GetCurrentDir : string;
Функция GetCurrentDir возвращает строку, содержащую диск плюс путь к текущему каталогу.
Функция GetCurrentDir: Получение текущей директории
var
dir : string;
begin
// Получаем текущую директорию
dir := GetCurrentDir;
ShowMessage('Текущая директория = '+dir);
end;
Результат
Текущая директория = C:\Program Files\Borland\Delphi7\Projects
Похожие функции, процедуры и команды
ChDir — выбор диска и директории ( папки ), в которой будет производиться работа.
CreateDir — создаёт директорию.
GetDir — получает текущий каталог (диск плюс путь) для указанного диска.
MkDir — создаёт каталог.
RemoveDir — позволяет удалить директорию.
RmDir — удаление каталога.
SelectDirectory — выводит диалоговое окно, с помощью которого пользователь может выбрать директорию.
SetCurrentDir — изменяет текущую директорию.
ForceDirectories — создаёт новый путь каталогов.
