Последние записи

made in programmersforum 4

Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk

Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw

25th
Янв

Как получить расширение файла из строки с полным именем файла?

Posted by obzor under Delphi

Есть строка — названия файла с расширением, как получить расширение?
«1. MyImage.png».

Pavia

Код:

Ext:=ExtractFileExt('1. MyImage.png');

noveek

Можно похитрее ):

Код:

var
filename:string;
begin
filename:='31523.jpg';
memo1.lines.add(copy(filename,pos('.',filename)+1,length(filename)));
end;

Arigato

Зачем, если есть готовое решение? Тем более что точку надо искать с конца строки, а не с начала, так как в имени файла может быть несколько точек, и только последняя отделяет расширение.

noveek

Ну можно в обратном искать вполне:

Код:

USES
StrUtils
var
filename:string;
begin
filename:='31523.file.jpg';
memo1.lines.add(SearchBuf(pChar(filename), Length(filename), Length(filename)-1, 0, '.',[]));
end;

тема на форуме