| Описание |
Delphi процедура Rename переименовывает файл данный FileHandle на новое имя укзанное в NewFileName..
Файл должен быть связан с файловой переменной процедурой AssignFile.
|
|
| Примечания |
|
Используйте RenameFile, когда Вы хотите переименовать файл без необходимости связывания его.
|
|
| Похожие команды |
|
| |
|
| Пример кода : Создание файла, его переименовка, и затем повторное его открытие с новым именем |
var
myFile : TextFile;
text : string;
begin
//
Попытка открыть Test.txt для записи
AssignFile(myFile, 'Test.txt');
ReWrite(myFile);
// Запись нескольких известных слов в этом файл
WriteLn(myFile, 'Hello');
WriteLn(myFile, 'World');
// Закрытие файла
CloseFile(myFile);
// Попытка переименовать файл - гарантируется, что никакой такой файл не существует сначала!
DeleteFile('NewName.txt');
Rename(myFile, 'NewName.txt');
// Теперь читаем файл
AssignFile(myFile, 'NewName.txt');
ReSet(myFile);
// Показ содержимого
while not Eof(myFile) do
begin
ReadLn(myFile, text);
ShowMessage(text);
end;
// Закрываем файл в последний раз
CloseFile(myFile);
end;
|
Hello
World
|
|
