Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 28.06.2011, 03:47   #1
Yazon2006
Пользователь
 
Регистрация: 03.12.2010
Сообщений: 20
Вопрос Как загрузить gif в TImage из php?

Не могу загрузить. Вот код, который использую:

Код:
with IdHTTP1.Create(nil) do
  try
    MS := TMemoryStream.Create;
    try
      Get('http://newrpg.ru/img_dob.php?iduser='+captcha, MS);
      MS.Position := 0;
      Image1.Picture.Graphic.LoadFromStream(MS);
    finally
      MS.Free;
    end;
  finally
    Free;
  end;
Использую Delphi 2010, в переменной captcha храню динамически генерируемое окончание адреса странички.

Пожалуйста, покажите например, как загрузить вот такую картинку на ТImage:
http://newrpg.ru/img_dob.php?iduser=...975&1309215937

Если поможет, вот форма, на которой размещаеться картинка:

Код:
<form ENCTYPE='multipart/form-data' method='post' action='ozero_ob.php?1309217468'><table valign=medle><tr><td>Введите число<td><img src='img_dob.php?iduser=112459975&1309217468'></table><input size='10' type='text' id='intmakr' name='intmakr'><br><input type='submit' value='Подтвердить' name='makrb' class='forma'></form>
Yazon2006 вне форума Ответить с цитированием
Старый 28.06.2011, 07:39   #2
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

Цитата:
ENCTYPE='multipart/form-data' method='post'
вы это не забудьте учесть

два варианта:
1)в uses есть GIFIMage/GIF(не помню как верно называется)
2)создайте TGIFImage, в него и грузите.
ну и сторонние компоненты можно.
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Старый 28.06.2011, 18:04   #3
Yazon2006
Пользователь
 
Регистрация: 03.12.2010
Сообщений: 20
По умолчанию

Спасибо за ответ, в TGifImage загрузить не получилось, выкидало какую то ошибку.

Я скачал Jedi библиотеки отсюда: URL:: http://netcologne.dl.sourceforge.net...-Build3845.zip

И загрузил картинку в TJvGIFAnimator вот так:
Код:
MS:= TMemoryStream.Create;
Form1.IdHTTP1.Get('http://newrpg.ru/img_dob.php?iduser='+captcha, MS);
MS.Position := 0;
 JvGIFAnimator1.Image.LoadFromStream(MS);
MS.Free;
 JvGIFAnimator1.Visible:=true;
Но мне бы теперь как то картинку проанализировать. Например попиксельно проверить и сделать из картинки масив двумерный, т.е. чёрный пиксель 1, белый - 0. Для последующего семантического анализа......
Yazon2006 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как загрузить captcha и поместить её в TImage Streetracer Работа с сетью в Delphi 13 06.03.2010 01:45
Как загрузить в TImage Jpeg image? beemoto Общие вопросы Delphi 2 15.11.2009 14:05
Как загрузить в делфи 7 картинку с расширением GIF? вероника-kz Мультимедиа в Delphi 1 13.10.2009 13:46
Вопрос таков- как загрузить *.gif или флеш анимацию puha16 Общие вопросы Delphi 3 31.05.2008 21:02
Как загрузить GIF анимацию в Image Ramz Помощь студентам 1 27.04.2007 15:18