Правила форума
Rename (процедура)Язык:
Русский
English
Rename (процедура)
Переименовывает внешний файл.
Объявление
Procedure Rename(var F; NewName);
Режим
Windows, Real, Protected
Замечания
Параметр F - переменная любого файлового типа. Параметр NewName - типа String или PChar, если включен расширенный синтаксис. Внешний файл, связанный с переменной F переименовывается на NewName. Дальнейшие операции на F происходят уже с внешним файлом с новым именем.
В режиме {$I-} функция IOResult вернет 0, если операция была успешна, иначе, она возвращает отличный от нуля код ошибки.
См. также
Пример
Язык:
Русский
English
{ Пример программы для процедуры Rename }
var
F : File;
begin
{ Переименовывает файл. Имена вводятся в командной строке. }
if ParamCount <> 2 then
begin
WriteLn('Неверные параметры!');
Halt(1);
end;
Assign(F, ParamStr(1));
WriteLn('Переименовываю ', ParamStr(1), ' в ', ParamStr(2));
Rename(F, ParamStr(2));
end.
F : File;
begin
{ Переименовывает файл. Имена вводятся в командной строке. }
if ParamCount <> 2 then
begin
WriteLn('Неверные параметры!');
Halt(1);
end;
Assign(F, ParamStr(1));
WriteLn('Переименовываю ', ParamStr(1), ' в ', ParamStr(2));
Rename(F, ParamStr(2));
end.
::
::
::
