Pobranie obrazka z sieci

Mam pytanie. Jak pobrać obrazek z sieci? Tzn mam link do obrazka i chce go sciagnac alebo zaladowac do image1...

HTTP.Get + TJPEGImage + TMemoryStream + F1 + FAQ

procedure TWatek.Pobierz_TOKEN;
var
  start: byte;
begin
  jpg := TJpegImage.Create;
  bmp:=TBitmap.Create;
  dane := TStringStream.Create('');
  token := TMemoryStream.Create;
  Form1.IdHTTP.Host:='register.gadu-gadu.pl';
  Form1.IdHTTP.Get('/appsvc/regtoken.asp',dane);
  start:=pos(#$D#$A,dane.DataString);
  obrazek:=copy(dane.DataString,start+2,start);
  repeat
    Form1.IdHTTP.Get('http://register.gadu-gadu.pl/appsvc/tokenpic.asp?tokenid='+obrazek,token);
  until token.Position <> 0;
  token.Position := 0;
  jpg.LoadFromStream(token);
  bmp.Assign(jpg);
  Form1.Image1.Picture.Bitmap:=bmp;
end;