Me sigue quedando la duda: ¿No te da ningún mensaje de error?
¿O sea, pasa por la linea CopyFile(...); y no dice nada?
¿No te da una exception que diga algo? (el archivo ya existe, no tiene permiso, no existe la unidad, etc.)
Prueba poniendo a True la útima propiedad de CopyFile
Código Delphi
[-]
CopyFile(PChar(vFile), PChar('X:\RIS.XML'), True);
Código sacado de
Torry's Delphi Pages
Código Delphi
[-]
var
fileSource, fileDest: string;
begin
fileSource := 'C:\SourceFile.txt';
fileDest := 'G:\DestFile.txt';
CopyFile(PChar(fileSource), PChar(fileDest), False);
end;