Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.04.13;
Скачать: CL | DM;

Вниз

httpcli1 как загрузить jpeg ?   Найти похожие ветки 

 
Studios   (2008-03-20 22:49) [0]

Привет всем как мне загрузить с интернета картинку?
делаю так

var
ms:   TMemoryStream;
jpeg: TJpegImage;

try
httpcli1.URL:= ("http://milo.ru/captcha.php?id="+captcha_id);
httpcli1.ProxyPort:= porta;
httpcli1.ProxyUsername:=logina;
httpcli1.ProxyPassword:=passa;
httpcli1.Get;
ms.Position := 0;
jpeg.LoadFromStream(httpcli1.RcvdStream);
Image1.Picture.Graphic := jpeg;
finally
jpeg.Free; ms.Free; httpcli1.Free;
end;


не выводиться картинка в Image :(
Помогите пожалуйста.


 
tesseract ©   (2008-03-20 22:57) [1]

А почему должна ? TJpegImage  bitmap нужный Timage не далает.


 
tesseract ©   (2008-03-20 23:01) [2]

и кстати ms тут для красоты ?


 
Studios   (2008-03-20 23:03) [3]

ошибочка так вот

httpcli1.RcvdStream:=ms;
ms.Position := 0;
jpeg.LoadFromStream(ms);


 
Studios   (2008-03-20 23:04) [4]

на сервер создаёться файл в формате jpg


 
tesseract ©   (2008-03-20 23:08) [5]


> httpcli1.RcvdStream:=ms;


А точно всё считалось в поток ? Все другие компоненты требуют, чтобы поток был считан полностью. httpcli - это .NEt аналог indy ?


 
Studios   (2008-03-20 23:13) [6]

httpcli это ICS


 
tesseract ©   (2008-03-20 23:20) [7]


> httpcli это ICS


Вроде в TJpegImage раньше имелась функция DeebNeeded()   которая и осуществляла процессинг файла.



Страницы: 1 вся ветка

Текущий архив: 2008.04.13;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.018 c
2-1205763221
Berkoot
2008-03-17 17:13
2008.04.13
Надстрочный индекс в Delphi


15-1204265877
kiberg
2008-02-29 09:17
2008.04.13
Заполнение массива


2-1205655917
NewSer
2008-03-16 11:25
2008.04.13
Как проверить уникальность вводимого в ключевое поле значения?


15-1204178474
SteepeWolf
2008-02-28 09:01
2008.04.13
Восстановление данных


2-1205835608
Podarok
2008-03-18 13:20
2008.04.13
Вызов функций класса