Модуль: SysUtils

Описание
Функция возвращает расширение файла, имя которого указано в параметре FileName. Результирующая строка включает в себя символ точки и символы расширения файла. Если указанное имя файла не имеет расширения, то функция возвращает пустую строку.
Данная функция поддерживает работу с многобайтовыми наборами символов (MBCS).

Пример
var
   S1, S2 : string;
begin
...
   S1:= ExtractFileExt( 'www.atrussk.ru/delphi/index.htm');    //S1:='.htm'
   S2:= ExtractFileExt( 'www.atrussk.ru');     //S2 :='.ru'
...
end;