Функция 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;