Pages

sábado, 14 de janeiro de 2012

Mover arquivos com Delphi

Mover arquivos com o delphi é bem simples, basta você usar a função copyFile().

Como utilizar:
copyFile( 'LOCAL DO ARQUIVO', 'ONDE', CONDIÇÃO BOOLEANA );

Exemplo:

copyFile( Pchar( ' C:\arquivo.exe '), PChar( 'D:\aqueleArquivo.exe'  ), true );

FALSE se o arquivo já existir então retorna falso.
TRUE se o arquivo existir então substitui o arquivo e retorna verdadeiro.

Função para uso:

function copiarArquivo(origem, destino: String; subs: Boolean): Boolean;
begin
    result:= copyFile( Pchar(origem), Pchar(destino), subs ) ;
end;

Nenhum comentário:

Postar um comentário