Извлечение имени файла из полного пути в языке Pascal

Delphi , Программа и Интерфейс , Размеры и Положение

При работе с файловой системой в среде разработки, основанной на языке Pascal, часто возникает задача извлечения имени файла из полного пути. В .NET для этого существуют функции Path.GetFileName и String.IndexOf, которые позволяют легко выполнить данную задачу. Например, для строки "C:\docs\file.txt" эти функции вернут "file.txt".

В данной статье мы рассмотрим, как решить аналогичную задачу в среде разработки, использующей язык Pascal, в частности, в Delphi.

Решение задачи

В Delphi для извлечения имени файла из полного пути можно использовать функцию ExtractFileName. Эта функция является частью библиотеки компонентов runtime (RTL), предоставляемой средой разработки.

Пример кода

program ExtractFileNameExample;

{$APPTYPE CONSOLE}

uses
  System.SysUtils;

var
  FullPath: string;
  FileName: string;
begin
  FullPath := 'C:\docs\file.txt';
  FileName := ExtractFileName(FullPath);
  Writeln('Имя файла: ', FileName);
  Readln;
end.

Когда вы запустите данный пример, в консоли отобразится имя файла без пути: file.txt.

Альтернативные подходы

Если вы работаете в среде, которая не поддерживает функцию ExtractFileName, например, в Inno Setup, вы можете использовать функцию Pos для поиска последнего слеша (\) в строке, после чего извлечь подстроку.

Пример кода для Inno Setup

uses
  System.SysUtils;

var
  FullPath: string;
  FileName: string;
  SlashPos: Integer;
begin
  FullPath := 'C:\docs\file.txt';
  SlashPos := Pos('\', FullPath);
  if SlashPos > 0 then
    FileName := Copy(FullPath, SlashPos + 1, Length(FullPath));
  Writeln('Имя файла: ', FileName);
end.

В этом примере Copy - это функция, которая копирует часть строки, начиная с указанной позиции и до конца исходной строки.

Заключение

Извлечение имени файла из полного пути - это стандартная задача в программировании, которая имеет свои особенности в зависимости от используемой среды разработки. В Delphi для этого предназначена функция ExtractFileName, которая позволяет быстро и удобно решать данную задачу.

Создано по материалам из источника по ссылке.

Статья о том, как извлечь имя файла из полного пути в среде разработки, использующей язык Pascal, в частности, в Delphi, с примерами кода и альтернативными подходами.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Размеры и Положение ::