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
GetDir
Процедура
Получает текущий каталог (диск плюс путь) для указанного диска. System unit
  procedure GetDir ( Drive : Byte; var Directory : string ) ;
Описание
Процедура GetDir сохраняет в переданной строке параметра Directory диск указанный в параметре Drive плюс путь к текущему каталогу. Значения параметра Drive: 0 = Текущий диск 1 = диск А 2 = диск B 3 = диск C 4 = диск D
Похожие команды
ChDir  Выбор диска и директории ( папки ), в которой будет производиться работа

CreateDir  Создаёт директорию

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

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

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

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

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

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

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

 
Пример кода : Получение директории для диска C:\
var
  DirName : string;

begin
  GetDir(3, DirName);   // Сохраняем директорию C: в переменной DirName
  ShowMessage(DirName);
end;
Следующий вывод будет обязательно изменятся на других ПК:
C:\Program Files\Borland\Delphi7\Projects
 



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