DELPHI ИМЯ ФАЙЛА БЕЗ РАСШИРЕНИЯ
Для получения имени файла без расширения в Delphi можно воспользоваться функцией ExtractFileName() и убрать расширение при помощи функции ChangeFileExt(). Например:
var filename, filenameWithoutExt: string;begin filename := 'example.txt'; filenameWithoutExt := ChangeFileExt(ExtractFileName(filename), ''); ShowMessage(filenameWithoutExt);end;
В данном примере переменной filename присваивается значение 'example.txt'. Функция ExtractFileName() возвращает только имя файла с расширением ('example.txt'), которое затем передается в ChangeFileExt() в качестве первого параметра. Второй параметр (пустая строка) указывает, что нужно удалить расширение файла. Результат функции (имя файла без расширения) присваивается переменной filenameWithoutExt. В конце кода результат выводится в виде сообщения при помощи функции ShowMessage().
Как узнать и изменить расширение файла
Деловая программа ПМЭФ-2023. День третий: прямая трансляция
Файлы и привязка файлов к программам
Как изменить формат файла?
Delphi - Сохранение данных в текстовый файл и компонент SaveDialog
Программирование в Delphi Урок 8. Компоненты Главное меню и диалоговые окна