• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

Mikas

Curiosidades - Como Fazer um Download de algo com Delphi

2 mensagens neste tópico

A partir de hoje vou comecar a colocar aqui alguns posts com varias dicas para Delphi!!!

Algumas sao apenas curiosidades, outras podem mesmo vir a dar jeito a alguem que precise:

A dica de hoje, ja k foi pedida é:

Como Fazer um Download de algo com Delphi!!!

Fazer Uses da Unit UrlMon

podem fazer uma funcao deste genero:

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

depois basta chamarem-na deste modo:

if DownloadFile ('http://www.onde.com/arq.htm','c:\arq.htm') then
  ShowMessage('Download Concluído.');

Espero siceramente que ajude!!!

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Bem-vindo, Miklas. ;)

Alterei o teu post para usar a ferramenta GeSHi que serve mesmo para meter código de programação, torna o código mais legível.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora