Home  |  Delphi .net Home  |  System.IO.File  |  Move Method
Move  
Method  
Moves the specified file to a new location, optionally with a new name
File Class
System.IO NameSpace
CF1.  Procedure Move ( SourceFile:StringSourceFile : String; TargetFile : String; ) ; Static;
CF : Methods with this mark are Compact Framework Compatible
Description
The file specified in SourceFile is moved to the directory specified in TargetFile. If the TargetFile contains a file name as well, the file is also renamed to the new name.
 
If there is no directory specified, the file is moved to the current directory with the specified new name.
 
The directory may be an absolute or relative value.
Microsoft MSDN Links
System.IO
System.IO.File
 
 
Using Move to rename the current file
program Project1;
{$APPTYPE CONSOLE}

uses
  System.IO;

var
  Path   : String;
  Files  : Array of String;
  Stream : FileStream;
  i      : Integer;

begin
  // Create the DelphiBasics.txt file
  Path := 'DelphiBasics.txt';
  Stream := System.IO.File.&Create(Path);

  // Close the file
  Stream.Close;

  // List files in the current folder
  Files := System.IO.Directory.GetFiles(Directory.GetCurrentDirectory);

  for i := 0 to Length(Files)-1 do
    Console.WriteLine(System.IO.Path.GetFileName(Files[i]));

  // Rename the file using the Move method
  Console.WriteLine;
  Console.WriteLine('Renaming DelphiBasics.txt using MoveTo :');
  Console.WriteLine;

  System.IO.File.Move(Path, 'RenamedDelphiBasics.txt');

  // List files in the current folder
  Files := System.IO.Directory.GetFiles(Directory.GetCurrentDirectory);

  for i := 0 to Length(Files)-1 do
    Console.WriteLine(System.IO.Path.GetFileName(Files[i]));

  // Clean up - delete the file
  System.IO.File.Delete(Path);

  Console.Readline;
end.
Show full unit code
  DelphiBasics.txt
  Project1.exe
  Project1.pdb
  Project1.rsp
  
  Renaming DelphiBasics.txt using MoveTo :
  
  Project1.exe
  Project1.pdb
  Project1.rsp
  RenamedDelphiBasics.txt
 
 
Delphi Programming © Neil Moffatt All rights reserved.  |  Contact the author