FORUM DARKERS

Tecnologia & Informática => Programação => Delphi => Topic started by: psycho on 09 de July , 2008, 12:01:42 PM

Title: Baixar arquivo (dúvida)
Post by: psycho on 09 de July , 2008, 12:01:42 PM
Olá, bom dia/tarde

Estou querendo baixar um arquivo do meu servidor
para o computador, Mais gostaria de informar o diretório
a ser deposito pelo registro do windows, Como proceguir?

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
Copyfile('c:\Arquivos de Programas\SoftPlayer\arquivo.txt',
'c:\Arquivos de Programas\SoftPlayer\skin\arquivo.txt') then

end.

No code acima baixa na pasta 'Arquivos de Programas\softPlayer
e copia para softplayer\skin

Como poderia informar o diretorio a ser baixado pelo registro do windows?

Muito obrigado pela atenção

Até mais
Title: Re: Baixar arquivo (dúvida)
Post by: OnlyOne on 07 de September , 2008, 11:54:59 PM
duas coisas

vc pode baixar direto na sua pasta de skin , nao precisa copiar !! ecomomiza codigo ok ?

q le do registro ?

tem zilhoes de sites na net q mostram como q vc grava e le do registry , e so vc fazer um poko de esforço tb ne !!!!!!!!!!

vc e iniciante , nao espere as coisas de mao bjada garoto

estuda q isso q vc perguntou e simples demais , e so se pesquisar mesmo
Title: Re: Baixar arquivo (dúvida)
Post by: Zero cool on 08 de September , 2008, 12:53:52 PM
Isso é um loader ^^ auauau
Acho que o boy ae esta mal intencionado  xd
Title: Re: Baixar arquivo (dúvida)
Post by: Mateus on 08 de September , 2008, 08:25:48 PM
todos os traços de banker =x
inclusive o português aleijado ^^
Só ajudo depois dele me convencer que não vai usar o lado negro da força ^^
Title: Re: Baixar arquivo (dúvida)
Post by: sqlinject on 11 de September , 2008, 10:05:26 PM
não entendi muito bem, se explicar melhor eu posso ti ajudar =)