Облака / 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.
Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.



Вопросы
  Компонент StatusBar
   Категория: Компоненты
  Создание ярлыка на Рабочем столе
   Категория: Приложение
  Удалить файл в Корзину
   Категория: Приложение
  Программно скрыть MainMenu
   Категория: Компоненты
  Создание и удаление полей
   Категория: Базы данных
  Пароль на ADO
   Категория: Базы данных
  Номер строки в memo под курсором
   Категория: Текст и строки
  К-во рабочих дней в месяце
   Категория: Математика

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

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

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

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

var fullFileName : string; begin // Установка полного имени файла с диском и путем fullFileName := 'C:Program FilesBorlandDelphi7ProjectsUnit1.dcu'; // Показ составляющих частей этого полного имени ShowMessage('Диск = '+ExtractFileDrive (fullFileName)); ShowMessage('Каталог = '+ExtractFileDir (fullFileName)); ShowMessage('Путь = '+ExtractFilePath (fullFileName)); ShowMessage('Имя = '+ExtractFileName (fullFileName)); ShowMessage('Расширение = '+ExtractFileExt (fullFileName)); end;

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

  << Вернуться