TImage usando imagem remota
tenho um TIMage q precisa exibir uma imagem que esta remota... seria na teoria +/- assim:
image1.pictures.loadfromfile(´http://www.teste.com/imagem.jpg´);
mas isso não funciona.. alguem me da uma idéia por favor..
obrigado :idea:
image1.pictures.loadfromfile(´http://www.teste.com/imagem.jpg´);
mas isso não funciona.. alguem me da uma idéia por favor..
obrigado :idea:
Vicente.gsp
Curtidas 0
Respostas
::d::a::m::m::i::t::
31/01/2004
cara... faz o download e salva em um arquivo temporário, dai carrega ela...
eu sabia de um comando no delphi p/ baixar coisas, mas eu testei e naum consegui...
vou ficar te devendo....
eu sabia de um comando no delphi p/ baixar coisas, mas eu testei e naum consegui...
vou ficar te devendo....
GOSTEI 0
Delphibond
31/01/2004
la vai:
function tfrmDolar.Download(Origem, Destino: string): Boolean;
begin
try
Result := UrlDownloadToFile(nil, PChar(Origem), PChar(Destino), 0, nil) = 0;
except
Result := False;
end;
end;
vc chama essa fução e coloca por exemplo:
if download(´http://www.teste.com/imagem.jpg´,´c:\imagem.jpg´) then
image1.picture.loadfromfile(´c:\imagem.jpg´);
blz?
espero ter ajudado
problema tou no mail aí em baixo
t+
function tfrmDolar.Download(Origem, Destino: string): Boolean;
begin
try
Result := UrlDownloadToFile(nil, PChar(Origem), PChar(Destino), 0, nil) = 0;
except
Result := False;
end;
end;
vc chama essa fução e coloca por exemplo:
if download(´http://www.teste.com/imagem.jpg´,´c:\imagem.jpg´) then
image1.picture.loadfromfile(´c:\imagem.jpg´);
blz?
espero ter ajudado
problema tou no mail aí em baixo
t+
GOSTEI 0
Delphibond
31/01/2004
declara URLmon na uses
FAlOW
FAlOW
GOSTEI 0