Delphi справочник - Форум программистов - Навигация  
 A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z      По первой букве  
System     SysUtils     StrUtils     DateUtils     FileCtrl     ConvUtils     StdConvs     Math     Classes     Dialogs     Types     Variants    ПО Unit   Compiler directives     Directives     Keywords     Types     Variables     Constants     Functions     Procedures    По категории  
Подписаться на рассылку:
Клуб программистов


Основы Delphi
ChDir
Процедура
Выбор диска и директории ( папки ), в которой будет производиться работа System unit
  procedure ChDir ( const Directory : string ) ;
Описание
Процедура ChDir выполняет переход в указанный диск и папку, в которой будет производиться работа.

В данной процедуре необходимо указывать полный адрес папки.

Если искомой директории не существует, то происходит ошибка - ElnOutError. И директория остаётся неизменённой.
Похожие команды
CreateDir  Создаёт директорию

GetCurrentDir  Возвращает текущий каталог (диск плюс каталог)

GetDir  Получает текущий каталог (диск плюс путь) для указанного диска.

MkDir  Создаёт каталог

RemoveDir  Позволяет удалить директорию

RmDir  Удаление каталога

SelectDirectory  Выводит диалоговое окно, с помощью которого пользователь может выбрать директорию

SetCurrentDir  Изменяет текущую директорию

ForceDirectories  Создаёт новый путь каталогов

 
Пример кода : Получение и установка каталога в диск C:
var
  directory : string;

begin
  // Получение каталога для диска C
  GetDir(2, directory);
  ShowMessage('Каталог диска C, по умолчанию = '+directory);

  // Установка каталога C в это значение
  ChDir(directory);
  GetDir(2, directory);
  ShowMessage('Каталог диска C, по умолчанию = '+directory);

  // Попытка установить в недопустимое значение
  ChDir('C:Bad/Path/Value');
  GetDir(2, directory);
  ShowMessage('Каталог диска C, по умолчанию = '+directory);
end;
Следующий вывод будет изменяться на различных PC:

C:\Program Files\Borland\Delphi7\Projects
C:\Program Files\Borland\Delphi7\Projects

ElnOutError with error 'Invalid file name'
 



© Блог программистов   |  Создание и продвижение сайтов - "Веб сателлит"  |  Ссылки  |     |  Английская версия