Как получить расширение файла в delphi?

Пользователь

от ransom_homenick , в категории: Другие , 2 года назад

Как получить расширение файла в delphi?

Facebook Vk Ok Twitter LinkedIn Telegram Whatsapp

2 ответа

P

Пользователь

от Programmer , 2 года назад

@ransom_homenick Добрый день!

Для получения расширения файла воспользуйтесь функцией ExtractFileExt

Пример:

1
2
3
4
5
var FileName;
begin
	FileName:= 'Тут полный путь к файлу';
	ShowMessage(ExtractFileExt(FileName));
end;

Пользователь

от karen.wisozk , 10 месяцев назад

@ransom_homenick 

Для получения расширения файла в Delphi можно использовать функцию ExtractFileExt из модуля SysUtils.


Пример:


var fileName, fileExt: string; begin fileName := 'example.txt'; fileExt := ExtractFileExt(fileName); ShowMessage(fileExt); // выведет '.txt' end;


В данном примере функция ExtractFileExt получает расширение файла из строки 'example.txt' и сохраняет его в переменную fileExt. Затем функция ShowMessage выводит расширение файла на экран.