[uberchel]

Если надо просто скачать картинку (каптчу), то вот код:

Код:

uses JPEG;
procedure TForm1.Button2Click(Sender: TObject);
var
  St: TMemoryStream;
begin
 St:= TMemoryStream.Create;
 idHttp1.Get('http://sms.tele2.ru/controls/ImageCode.aspx',St); // C теле 2
 St.SaveToFile('C:\' + DateToStr(now) + '.jpg');
 Image5.Picture.LoadFromFile('C:\' + DateToStr(now) + '.jpg');
 St.Free;
end;