Разное
Облака / Clouds
The bast cloud service
Get 20 GB free!!!
Support WebDav.
Show more >>
time-tested cloud storage
Support WebDav.
Последние книги
Самое популярное
Все бесплатно
Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация
Вопросы
Delphi - Справочник: ChangeFileExt
ChangeFileExt
|
function ChangeFileExt ( const FileName, Extension : string ) : string; |
Функция (Unit SysUtils)
|
Изменяет расширение имени файла
|
Описание:
|
Функция ChangeFileExt изменяет расширение файла. Имя файла задаётся полностью, через запятую задаётся новоё расширение, смотри пример. |
Пример кода: Переименовывает Unit1.dcu в Unit1.old
|
var oldName, newName : string; begin // Попытка переименовать текущий Unit1.dcu в Uni1.old oldName := 'Unit1.dcu'; newName := ChangeFileExt(oldName, '.new'); // Показ нового и старого значения ShowMessage('OldName = '+oldName); ShowMessage('NewName = '+newName); end;
Результат:
|
OldName = Unit1.dcu NewName = Unit1.new |