Версия для печати темы Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > Представление имен файлов в нужном нам виде

Автор: THandle 23.5.2008, 12:09

В связи с тем, что данный вопрос задается очень часто, я решил кратко описать все функции “семейства” ExtractFile, чтобы потом можно было сюда направлять вопрошающих, пусть выбирают то, что им требуется.   Допустим, что у нас есть некоторый путь к файлу: Цитата C:\\Program Files\Files\Archives\File.rar Все примеры будут показаны именно на этом пути. Функция ExtractFileDir. Объявлена в модуле SysUtils как: Код function ExtractFileDir(const FileName: string): string; Единственный параметр FileName – это полное имя файла, содержащее путь к нему. Результат, это строка, содержащая директорию файла без завершающего слеша. То есть, допустим, вызовем эту функцию для нашего пути: Цитата C:\\Program Files\Files\Archives\File.rar Результат будет таким: Цитата C:\\Program Files\Files\Archives Вызываем допустим так: Код ShowMessage(ExtractFileDir('C:\\Program Files\Files\Archives\File.rar')); Функция ExtractFileDrive. Объявлена в модуле SysUtils как: Код function ExtractFileDrive(const FileName: string): string; Параметр FileName, как и в предыдущей функции – полный путь к файлу. Результат – это строка, содержащая букву раздела жесткого диска + двоеточие. Вызываем для пути к файлу: Цитата C:\\Program Files\Files\Archives\File.rar Результат: Цитата C: Вызываем допустим так: Код ShowMessage(ExtractFileDrive('C:\\Program Files\Files\Archives\File.rar')); Функция ExtractFileName. Объявлена в модуле SysUtils как: Код function ExtractFileName(const FileName: string): string; Параметр FileName, как и в предыдущих функциях – путь к файлу. Результат – это строка, содержащая имя файла с расширением. Вызываем для пути к файлу: Цитата C:\\Program Files\Files\Archives\File.rar Результат: Цитата File.rar Вызываем допустим так: Код ShowMessage(ExtractFileName('C:\\Program Files\Files\Archives\File.rar')); Функция ExtractFileExt. Объявлена в модуле SysUtils как: Код function ExtractFileExt(const FileName: string): string; Параметр FileName – путь к файлу, или его имя. Результат – это строка, содержащая в себе расширение файла с точкой перед ним. Вызываем для пути к файлу: Цитата C:\\Program Files\Files\Archives\File.rar Результат: Цитата .rar Вызываем допустим так: Код ShowMessage(ExtractFileExt('C:\\Program Files\Files\Archives\File.rar')); Или так: Код ShowMessage(ExtractFileExt('File.rar')); Функция ExtractFilePath. Объявлена в модуле SysUtils как: Код function ExtractFilePath(const FileName: string): string; Параметр FileName, как и в предыдущих функциях – путь к файлу. Результат – тот же что и в ExtractFileDir, но с завершающим слешом в конце. Вызываем для пути к файлу: Цитата C:\\Program Files\Files\Archives\File.rar Результат: Цитата C:\\Program Files\Files\Archives\ Вызываем допустим так: Код ShowMessage(ExtractFilePath('C:\\Program Files\Files\Archives\File.rar')); Так же есть функция ExpandFileName, которая бъявлена в модуле SysUtils как: Код function ExpandFileName(const FileName: string): string; Она преобразует переданную в FileName строку в валидный путь к файлу(удаляет лишние слеши и тд.) Например: дана строка: Цитата C:\\\\\Program Files\/Files\\\Archives\File.rar  После вызова ExpandFileName, допустим, таким образом: Код ShowMessage(ExpandFileName('C:\\\\\Program Files\/Files\\\Archives\File.rar')); будет показано сообщение с результатом работы функции ExpandFileName, а результат этот будет таким: Цитата C:\Program Files\Files\Archives\File.rar В завершение скажу, что все эти функции работают со строками, а не с реальными файлами, то есть, допустим, мы вызовем функцию ExtractFilePath так: Код ShowMessage(ExtractFilePath('A:\\BB\CCC\DDDD.eeeee')); Результатом будет “нормальный” путь к файлу: Цитата A:\\BB\CCC\ Так как эти функции работают со строками, не следуют так же пытаться с их помощью найти какой-нибудь файл, например Project1.exe на жестком диске, “поиск” результатов не даст, и полный путь к этому файлу не вернет. Собственно говоря, поиска то и не будет, это заблуждение некоторых начинающих программистов.     PS. Написано для тех кому лень пользоваться http://forum.vingrad.ru/act-Search/f-331.html, или читать справку.

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)