Справочник функций и процедур Delphi: ExtractFilePath

  Навигация по первой букве:

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

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

  Реклама:

|  Мотосалон Квадропарк - cf moto 625 x6 от официального дилера.  |

ExtractFilePath
Функция
Извлекает из полного имени файла название патча SysUtils unit
  function ExtractFilePath ( const FullFileName : string ) : string;


Описание
Функция ExtractFilePath извлекает из FullFileName подстроку пути.

Это часть полного имени файла включая конечный \ перед именем файла.
Похожие команды
ChangeFileExt  Изменяет расширение имени файла

ExtractFileDir  Иизвлекает из полного имени файла название папки

ExtractFileDrive  Извлекает из полного имени файла название диска

ExtractFileExt  Извлекает из полного имени файла его расширение

ExtractFileName  Извлекает из полного имени файла краткое имя файла

ProcessPath  Разделяет строку диск/путь/имя файла на ее составляющие части

 
Пример кода : Извлечение всех частей полного имени файла
var
  fullFileName : string;

begin
  // Установка полного имени файла с диском и путем
  fullFileName := 'C:\Program Files\Borland\Delphi7\Projects\Unit1.dcu';

  // Показ составляющих частей этого полного имени
  ShowMessage('Диск       = '+ExtractFileDrive (fullFileName));
  ShowMessage('Каталог    = '+ExtractFileDir   (fullFileName));
  ShowMessage('Путь       = '+ExtractFilePath  (fullFileName));
  ShowMessage('Имя        = '+ExtractFileName  (fullFileName));
  ShowMessage('Расширение = '+ExtractFileExt   (fullFileName));
end;

Диск = C:
Каталог = C:\Program Files\Borland\Delphi7\Projects
Путь = C:\Program Files\Borland\Delphi7\Projects\
Имя = Unit1.dcu
Расширение = .dcu
 


Copyright © 2004-2018 Delphi Sources (источник – "DelphiBasics.ru")
 

Delphi XE8

Embarcadero® Delphi XE8 — это самое быстрое решение для разработки программного обеспечения, ускоряющее проектирование, программирование и создание взаимодействующих приложений для Windows, Mac, iOS, Android и IoT. Создавайте готовые решения корпоративного класса, включая в него разные клиентские native-платформы, мобильные расширения, интеллектуальные устройства, облачные службы, корпоративные и встроенные базы данных.


Группа ВКонтакте   Facebook   Ссылка на Twitter