Разное
Облака / Clouds
    Go to Copy.com
    Copy.com
    The bast cloud service
    Get 20 GB free!!!
    Support WebDav.
    Show more >>
    Go to Dropbox.com
    Dropbox.com
    time-tested cloud storage
    Support WebDav.



Последние книги
Самое популярное
Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация



Вопросы
  Фреймы
   Категория: Компоненты
  Получение списка всех сетевых дисков из Delphi
   Категория: Интернет и Сети
  Подсчитать количество слов в строке
   Категория: Текст и строки
  Компоненты Panel, GroupBox, Bevel, ScrollBox, Splitter
   Категория: Компоненты
  Cколько файлов есть в определённой папке
   Категория: Файловая система
  Упаковать *.mdb-файл
   Категория: Базы данных
  Как закачать файл из Интернета
   Категория: Интернет и Сети
  Последний день месяца
   Категория: Базы данных

Delphi - Справочник: GetCurrentDir

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

 GetCurrentDir
GetCurrentDir : string;
Функция (Unit SysUtils)
Возвращает текущий каталог (диск плюс каталог)
Описание:
Процедура GetCurrentDir возвращает строку, содержащую диск плюс путь к текущему каталогу.
Пример кода: Получение текущей директории 

var
  dir : string;

begin
  // Получаем текущую директорию
  dir := GetCurrentDir;
  ShowMessage('Current directory = '+dir);
end;

Результат:
Текущая директория = C:Program FilesBorlandDelphi7Projects

  << Вернуться