ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2
Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей. Здесь обсуждаются безопасность, программирование, технологии и многое другое. Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

httpcli1 как загрузить jpeg ?
  #1  
Старый 21.03.2008, 00:07
Student :)
Участник форума
Регистрация: 09.02.2007
Сообщений: 202
Провел на форуме:
537148

Репутация: 9
Отправить сообщение для Student :) с помощью ICQ
По умолчанию httpcli1 как загрузить jpeg ?

Код:
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;
httpcli1.RcvdStream:=ms;
ms.Position := 0;
jpeg.LoadFromStream(ms);
Image1.Picture.Graphic := jpeg;
finally
jpeg.Free; ms.Free; httpcli1.Free;
end;
не выводиться картинка в Image
Помогите пожалуйста.

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

  #2  
Старый 21.03.2008, 00:11
~Real F@ck!~
Постоянный
Регистрация: 09.07.2006
Сообщений: 443
Провел на форуме:
2382453

Репутация: 354
Отправить сообщение для ~Real F@ck!~ с помощью ICQ
По умолчанию

не легче перекодировать формат в том же Paint'e ?
 
Ответить с цитированием

  #3  
Старый 21.03.2008, 00:13
Student :)
Участник форума
Регистрация: 09.02.2007
Сообщений: 202
Провел на форуме:
537148

Репутация: 9
Отправить сообщение для Student :) с помощью ICQ
По умолчанию

httpcli это ICS
 
Ответить с цитированием

  #4  
Старый 21.03.2008, 20:32
Pir4tt
Участник форума
Регистрация: 03.01.2008
Сообщений: 104
Провел на форуме:
400001

Репутация: 111
Отправить сообщение для Pir4tt с помощью ICQ
По умолчанию

Код:
var
jpeg: TGraphic;

{CUttED}

  jpeg := TJpegImage.Create;
    try
      jpeg.LoadFromStream(ms);
      Image1.Picture.Graphic := jpeg;
    finally
      jpeg.Free;
    end;
 
Ответить с цитированием

  #5  
Старый 22.03.2008, 18:18
Student :)
Участник форума
Регистрация: 09.02.2007
Сообщений: 202
Провел на форуме:
537148

Репутация: 9
Отправить сообщение для Student :) с помощью ICQ
По умолчанию

спасибо! щас попробуем
 
Ответить с цитированием

  #6  
Старый 23.03.2008, 02:31
Student :)
Участник форума
Регистрация: 09.02.2007
Сообщений: 202
Провел на форуме:
537148

Репутация: 9
Отправить сообщение для Student :) с помощью ICQ
По умолчанию

Код:
procedure TForm1.Button1Click(Sender: TObject);
var
ms:   TMemoryStream;
jpeg: TGraphic;
begin
ms := TMemoryStream.Create;
jpeg := TJpegImage.Create;
try
httpcli1.URL:= 'http://forum.antichat.ru/image.php?u=32867&dateline=1202417398';
httpcli1.Get;
httpcli1.RcvdStream:=ms;
jpeg.LoadFromStream(ms);
Image1.Picture.Graphic := jpeg;
finally
end;
end;
делаю так выскакивает ошибка
 
Ответить с цитированием

  #7  
Старый 23.03.2008, 03:59
Pir4tt
Участник форума
Регистрация: 03.01.2008
Сообщений: 104
Провел на форуме:
400001

Репутация: 111
Отправить сообщение для Pir4tt с помощью ICQ
По умолчанию

а зочем ты туда гиф суёшь?
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Баг в ИЕ (отображение html в изображениях). Как юзать. censored! Авторские статьи 54 21.08.2009 06:42
Как искать "правильные" хосты под дорвей и как собрать свою спам-базу. x88x Черные методы раскрутки 19 31.08.2008 12:02
Как «растянуть» аккумулятор novichok Сотовый фрикинг 4 28.02.2006 22:47
Внедрение Sql кода с завязанными глазами k00p3r Чужие Статьи 0 12.06.2005 20:48



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ