[[duilioisola]]

Parece ser que si... No veo ningún otro error.
Si lo que quieres copiar es un archivo XML, lo que te sugiero que hagas es lo siguente:
Creas un TStrings y utilizas los métodos LoadFromFile SaveToFile

Código Delphi [-]
var
  ts : TStrings;
[...]
   {CopyFile(PChar(vFile),PChar('X:\archivo.XML'),False);}
   ts := TStrings.Create;
   try
      ts.LoadFromFile(vFile);
      ts.SaveToFile('X:\archivo.XML');
   finally
      ts.Free;
   end;
[...]