Delphi Basics : ExtractFileExt command

DelphiBasics

ExtractFileExt
Function

Extracts the extension part of a full file name

SysUtils unit

function ExtractFileExt(const FullFileName string):string;

Description

The ExtractFileExt function extracts from FullFileName the extension substring.

The extension is give inclusive of the '.' prefix, such as .txt

Related commands

ChangeFileExt		Change the extension part of a file name
ExtractFileDir		Extracts the dir part of a full file name
ExtractFileDrive		Extracts the drive part of a full file name
ExtractFileName		Extracts the name part of a full file name
ExtractFilePath		Extracts the path part of a full file name
ProcessPath		Split a drive/path/filename string into its constituent parts

Download this web site as a Windows program.

Example code : Extract all of the parts of a full file name

var
  fullFileName : string;

begin
  // Set up a full file name with drive and path
  fullFileName := 'C:\Program Files\Borland\Delphi7\Projects\Unit1.dcu';

  // Show the component parts of this full name
  ShowMessage('Drive = '+ExtractFileDrive (fullFileName));
  ShowMessage('Dir   = '+ExtractFileDir   (fullFileName));
  ShowMessage('Path  = '+ExtractFilePath  (fullFileName));
  ShowMessage('Name  = '+ExtractFileName  (fullFileName));
  ShowMessage('Ext   = '+ExtractFileExt   (fullFileName));
end;

Show full unit code

  Drive = C:
  Dir = C:\Program Files\Borland\Delphi7\Projects
  Path = C:\Program Files\Borland\Delphi7\Projects\
  Name = Unit1.dcu
  Ext = .dcu