Функция Delphi ExtractFilePath

Delphi позволяет узнать полностью путь к файлу без имени самого файла. Для этого существует функция ExtractFilePath. Например если мы имеем полный путь файла "C:\Documents and Settings\int\Мои документы\doc1.doc", то "C:\Documents and Settings\int\Мои документы" будет этим самым путем.

Функция имеет следующий синтаксис:

function ExtractFilePath(const FileName: String): String;

Для закрепления материала расположим на форме компонент Label и кнопку.

Обработчик нажатия кнопки сделаем таким:

procedure TForm1.Button1Click(Sender: TObject);
begin
    if OpenDialog1.Execute then
      Label1.Caption :=
      ExtractFilePath(OpenDialog1.FileName);
end;

Нажав на кнопку открывается диалоговое окно выбора файла. Выбрав какой либо файл его путь будет показан  компонентом Label.

Итог: мы познакомились с функцией ExtractFilePath.

Понравилась статья? Раскажите друзьям:
Общайтесь со мной

Оставить комментарий

Ваш email не будет опубликован. Обязательные поля отмечены *

Вы можете использовать это HTMLтеги и атрибуты: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>