03.03.2008, 19:59
|
|
Участник форума
Регистрация: 03.01.2008
Сообщений: 104
Провел на форуме:
400001
Репутация:
111
|
|
Freedom скозалбы что пишешь регер))
Берёшь страничку, парсишь её, находишь линку на картинку, потом вытворяешь с ней примерно такой код:
http:=TIdHTTP.Create(nil);
msimg := TMemoryStream.Create;
try
http.Get('http://sie.net/kartinko.jpg', msimg);
msimg.Position := 0;
finally
http.Free;
end;
end;
получается у тебя картико в потоке, потом добавляешь:
NewGraphic := TJpegImage.Create;
try
NewGraphic.LoadFromStream(msimg);
Image1.Picture.Graphic := NewGraphic;
finally
NewGraphic.Free;
end;
и получается картинко на формочке в имаге, в юзес не забудь jpeg добавить 
|
|
|