Copiar Archivo
 

Alguien sabe de alguna funcion que copie un archivo de un lugar a otro, vi una funcion llamada copyfileto(), pero hay un problema, si el archivo existe no lo sobre-escribe devuelve false diciendo que el archivo no se copio, y eso es lo que quiero, que el archivo si existe lo sobre-escriba.

si alguien ya tiene implementado lo que he planteado aqui, seria tan amable de enviarme el fuente.

pues lo k tienes que hacer el verificar si el archivo existe en el directorio destino y si existe borrarlo y ya lo puedes copiar

Saludos

Hola,

Puedes utilizar la función "CopyFile" declarada en la unidad "Windows":

Código Delphi [-]
 procedure TForm1.Button1Click(Sender: TObject);
 begin
   if CopyFile(PChar('C:\archivo.txt'), PChar('D:\archivo.txt'), false) then
     ShowMessage('El archivo se copió correctamente')
   else
     ShowMessage(SysErrorMessage(GetLastError));
 end;

El tercer parámetro requerido por la función "CopyFile" determinará si el archivo ha de sobreescribirse o no en caso de que ya existiera.