
02.03.2010, 03:55
|
|
Познающий
Регистрация: 15.03.2009
Сообщений: 87
Провел на форуме: 893829
Репутация:
34
|
|
Сообщение от RedFern.89
на тебе пример на Delphi. думаю сможешь перевести
Код:
uses jpeg;
.........
var
Img : TJpegImage;
Ms : TMemoryStream;
begin
Img := TJpegImage.Create;
Ms := TMemoryStream.Create;
// Запрашиваем картинку и пишем ее в память
Http.Get('http://vkontakte.ru/captcha.php?s=1&sid=' + sid, Ms);
Ms.Position := 0;
// Грузим картинку из памяти
Jpg.LoadFromStream(ms);
Image1.Picture.Graphic := jpg; // Отображаем в Image1
// Чистим память
jpg.Free;
Ms.free;
end;
Под PNG сделай пожалуйста
|
|
|