<?xml version="1.0" encoding="UTF-8"?>
<rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:wfw="http://wellformedweb.org/CommentAPI/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
	xmlns:slash="http://purl.org/rss/1.0/modules/slash/"
	>

<channel>
	<title>Everson Novka &#187; gif</title>
	<atom:link href="http://www.eversonnovka.com/tag/gif/feed/" rel="self" type="application/rss+xml" />
	<link>http://www.eversonnovka.com</link>
	<description>Delphi para todos!</description>
	<lastBuildDate>Tue, 06 Oct 2009 23:16:58 +0000</lastBuildDate>
	<language>en</language>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
	<generator>http://wordpress.org/?v=3.2.1</generator>
		<item>
		<title>Carregar imagem de uma URL</title>
		<link>http://www.eversonnovka.com/carregar-imagem-de-uma-url/?utm_source=rss&#038;utm_medium=rss&#038;utm_campaign=carregar-imagem-de-uma-url</link>
		<comments>http://www.eversonnovka.com/carregar-imagem-de-uma-url/#comments</comments>
		<pubDate>Tue, 29 Sep 2009 04:22:54 +0000</pubDate>
		<dc:creator>Everson Novka</dc:creator>
				<category><![CDATA[Dicas]]></category>
		<category><![CDATA[Delphi]]></category>
		<category><![CDATA[download]]></category>
		<category><![CDATA[gif]]></category>
		<category><![CDATA[http]]></category>
		<category><![CDATA[imagem]]></category>
		<category><![CDATA[indy]]></category>
		<category><![CDATA[web]]></category>

		<guid isPermaLink="false">http://www.eversonnovka.com/?p=53</guid>
		<description><![CDATA[Este é um exemplo de como carregar uma imagem de uma página web]]></description>
			<content:encoded><![CDATA[<p>Pessoal, este é um exemplo de como carregar uma imagem de um site qualquer. Nessa aplicação utilizei a biblioteca GIFImg e o componente idHttp do pacote Indy. No form de exemplo tem os seguintes componentes:</p>
<p>Button1: TButton;<br />
imgLogoEmbarcadero: TImage;<br />
IdHTTP1: TIdHTTP;</p>
<p>No evento onclick do botão:</p>
<pre name="code" class="pascal">
var
  ImageMem : TMemoryStream;
  ImageGif: TGIFImage;
begin
  ImageMem := TMemoryStream.Create;
  ImageGif := TGIFImage.Create;
  try
    try
      IdHTTP1.Get('http://www.embarcadero.com/images/logo_new.gif', ImageMem);
    except on e: EIdHTTPProtocolException do
      begin
        if e.ErrorCode = 404 then // código de página não encontrada
        begin
          // Não achou!
          Exit;
        end;
      end;
    end;
    ImageMem.Position := 0;
    ImageGif.LoadFromStream(ImageMem);
    imgLogoEmbarcadero.Picture.Assign(ImageGif);
  finally
    ImageGif.Free;
    ImageMem.Free;
  end;
end;
</pre>
]]></content:encoded>
			<wfw:commentRss>http://www.eversonnovka.com/carregar-imagem-de-uma-url/feed/</wfw:commentRss>
		<slash:comments>0</slash:comments>
		</item>
	</channel>
</rss>

