Fórum Baixar arquivo na pasta certa #360892

08/07/2008

0

Delphi

Olá boa tarde,

Estou querendo baixar um arquivo do meu servidor,
Da seguinte maneira é o que estou fazendo:

uses
  SysUtils, Windows, UrlMon;

  function DownloadFile(Source, Dest: string): Boolean;
begin
  try
    Result:= UrlDownloadToFile(nil, PChar(source),PChar(Dest), 0, nil) = 0;
  except
    Result:= False;
  end;
end;

  begin
if DownloadFile
 (´http://servidor.com/arquivo.txt´,
´c:\Arquivos de Programas\SoftPlayer\arquivo.txt´) then

end.


Porém queria baixar o mesmo arquivo e coloca-lo em diretorios diferentes
do computador baixado, Como exemplo -> ´Arquivos de Programas\SoftPlayer\skin\Arquivo.txt´

Então para eu não fazer o download do mesmo arquivo 2 vezes...
A melhor solução seria copiar o arquivo? Ou em só um download dizer
os diretórios onde deve ser depositado o arquivo? Muito bem...
Para ficar melhor, E não haver error como por exemplo computadores inglês com
o diretório (arquivos de programas) diferente, Ou até mesmo a pasta do software
estiver em outro local, Qual seria a melhor solução de pegar o ambiente e
depositar na pasta certa sem error para qualquer computador

Registro?!

Até mais


Psycho

Psycho

Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar