Rename

Z Delphi & Pascal (česká wiki)
Verze z 5. 10. 2012, 17:49, kterou vytvořil Zdeno Sekerák (diskuse | příspěvky) (1 revízia: Unit System)
Skočit na navigaci Skočit na vyhledávání

Přejmenuje vnější soubor.

Deklarace
procedure Rename(var F; Newname);
Režim
Windows, Reálný, Chráněný
Poznámky
F je proměnná kteréhokoli z typů soubor a Newname je výraz typu string nebo výraz typu PChar, je-li povolena rozšířená syntaxe. Vnější soubor, přiřazený proměnné F, se přejmenuje na Newname. Další operace s proměnnou F budou operovat s vnějším souborem tohoto nového jména.
V režimu {$I-} vrací funkce IOResult hodnotu 0, pokud operace proběhla úspěšně, jinak vrátí nenulový kód chyby.
Viz také
Erase


Vzorový příklad

{Rename.PAS}
{Vzorový příklad pro proceduru Rename.}
{ Pro Windows: }
{ uses WinCrt; }
 var
   f : file;
 begin
   { Přejmenuje soubor. Staré a nové jméno je dáno na povelovém řádku. }
   if ParamCount <> 2 then
   begin
     Writeln('Chybný počet parametrů');
     Halt(1);
   end;
   Assign(f,ParamStr(1));
   Writeln(ParamStr(1),' přejmenován na ', ParamStr(2));
   Rename(f,ParamStr(2));
 end.