Copiar Arquivos

Question

Ol�,

Algu�m sabe me dizer como fazer para copiar arquivos sem ter que manipular o seu conte�do?

Obrigada.

Massuda · Answer

O WIndows disponibiliza uma fun��o para isso.

uses
  Windows,
...

function CopiarArquivo(const AOrigem, ADestino: string;
  const APodeSobrescrever: Boolean): Boolean;
begin
  Result := CopyFile(PChar(AOrigem), PChar(ADestino), APodeSobrescrever);
end;