Ir para conteúdo
Fórum Script Brasil
  • 0

(Resolvido) Copiar Arquivos


Eder

Pergunta

Ola..pessoal

Tou tentando copiar arquivos de uma pasta pra outra mas não ta funcionando...

tenho duas strings:

ArqOrigem (local de origem)

ArqDestino(local de Destino).

quando tento copiar da erro que tratei abaixo

IF CopyFile('ArqOrigem','ArqDestino',False)THEN
BEGIN
SHOWMESSAGE('Arquivo copiado com Sucesso.');
end
ELSE
SHOWMESSAGE('ERRO AO COPIAR Arquivo ');
END;

se eu usar assim funciona(sem trabalhar com variaveis):

CopyFile('c:\teste.txt','s:\teste.txt',False)

alguém sabe me dizer porque não copia??

Grato

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

  • 0

Opa

A Funcao CopyFile() faz parte da API do Windows, como foi escrito em C então utiliza o formato PChar

neste caso voce teria que ter dado cast na String, não sei nem como compilou rs

var
  ArqOrigem, ArqDestino: String;
begin
  ArqOrigem := 'C:\teste.txt';
  ArqDestino := 'S:\teste.txt';
  if CopyFile(PChar(ArqOrigem), PChar(ArqDestino), False) then
  ShowMessage('Arquivo copiado com sucesso!') else
  ShowMessage('Falha ao tentar copiar o arquivo.');
end;

abracos

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...