Delphi. Функция ExtractFileDir ( const FileName: string ): string;
Функция ExtractFileDir ( const FileName: string ): string;
Модуль: SysUtils
Описание
Функция извлекает из полного имени файла FileName полное имя каталога, в котором находится указанный файл. Если полное имя файла FileName не содержит ни имя диска, ни имена каталогов, то возвращается пустая строка. Результат функции можно использовать в качестве параметра для функций: CreateDir, RemoveDir и SetCurrentDir.
Данная функция поддерживает работу с многобайтовыми наборами символов (MBCS).
Пример
var
S: string;
begin
...
S:= ExtractFileDir( 'C:\DIR1\DIR2\myfile.zzz'); //S:= 'C:\DIR1\DIR2'
...
end;
Справочник по Delphi
Уроки Delphi
