Delphi-Help

Описание

function ExtractFileExt ( const FullFileName : string ) : string;

Функция ExtractFileExt извлекает из полного имени файла расширение файла.
В строку будет передано '.' + расширение.

Пример кода

var
fullFileName : string;
begin
// Установка полного имени файла с диском и путем
fullFileName := 'C:\Program Files\Borland\Delphi7\Projects\Unit1.dcu';
// Показ составляющих частей этого полного имени
ShowMessage('Диск       = '+ExtractFileDrive (fullFileName));
ShowMessage('Каталог    = '+ExtractFileDir   (fullFileName));
ShowMessage('Путь       = '+ExtractFilePath  (fullFileName));
ShowMessage('Имя        = '+ExtractFileName  (fullFileName));
ShowMessage('Расширение = '+ExtractFileExt (fullFileName));
end;

Диск = C:
Каталог = C:\Program Files\Borland\Delphi7\Projects
Путь = C:\Program Files\Borland\Delphi7\Projects\
Имя = Unit1.dcu
Расширение = .dcu

Примечание