Вывод jpg в Image

@Pavelll · Регистрация: 25.08.2009

Author24 — интернет-сервис помощи студентам

Где ошибка в коде:

Delphi
1
2
3
4
5
6
7
8
procedure TForm1.Button2Click(Sender: TObject);
begin
 S:=IdHTTP1.Get('http://love.fowap.ru/reg.php');
 FS:=TFileStream.Create('captcha.jpg',FMCreate);
 IdHTTP1.Get('http://love.fowap.ru/icode.php?5075&amp;icq2=c7532894a84ff213d7625ed7110a49e1.jpg', FS);
 FS.Free;
 Image2.Picture.LoadFromFile('captcha.jpg');
end;

???
Выскакивает ощибка jpeg error 53
помогите срочно!!!

@Vas-e-na · 03.09.2010, 00:48

1. Вы уверены что получаете картинку в правильном формате (т.е. файл не поврежден)???
2. Почему бы напрямую из МемориСтрим не загрузить в ТИмадже???

@Pavelll · 03.09.2010, 00:51 **[ТС]**

Сообщение от Vas-e-na

1. Вы уверены что получаете картинку в правильном формате (т.е. файл не поврежден)???
2. Почему бы напрямую из МемориСтрим не загрузить в ТИмадже???

1.да уверен,картинка на компьютере нормально открывается,
2.не знаю,все равно та же ошибка..

@Vas-e-na · 03.09.2010, 01:04

Сообщение от Pavelll

1.да уверен,картинка на компьютере нормально открывается,

к сожалению это не аргумент...
в подтверждение этого просто в гугле вбейте ошибку и сразу поймете 2 вещи:
1. Делфи не дружит с джепегом
2. Одназначно проблема с самим файлом...

@Pavelll · 03.09.2010, 01:14 **[ТС]**

короче как я понял,надо конвертировать его в png и потом выводить?

Fix777 · 03.09.2010, 05:55

Перешел по вашей ссылке с капчей и посмотрел свойства...
Тип: Изображение GIF

@Puporev · 03.09.2010, 06:53

1. Делфи не дружит с джепегом

Почему? Нужно добавить модуль jpeg, а при загрузке этого типа файла через Объект Инспектор, он сам добавляется.

@flatgad · 03.09.2010, 08:53

Можешь использовать компонент из JVCL называется JvImage он открывает (cur, pcx, ani, jpg, jpeg, bmp, ico,emf, wmf форматы). Если надо формат PNG то на торри компонент PNG Componets Plus v.1.00. посмотри может поможет. А вообще как люди пишут надо проверять сигнатуру файла может это вообще не картинка а какой небудь архив или ехе файл.

@Pavelll · 03.09.2010, 11:35 **[ТС]**

Попробыал сделать так:

Delphi
1
2
3
4
5
6
7
8
procedure TForm1.Button2Click(Sender: TObject);
begin
 S:=IdHTTP1.Get('http://love.fowap.ru/reg.php');
 FS:=TFileStream.Create('captcha.gif',FMCreate);
 IdHTTP1.Get('http://love.fowap.ru/icode.php?5075&amp;icq2=c7532894a84ff213d7625ed7110a49e1', FS);
 FS.Free;
  Image2.Picture.LoadFromFile('captcha.gif');
end;

Выскакивает ошибка при запросе капчи:
Unknown picture file extension(.gif)

Что тут не так?

@Vas-e-na · 03.09.2010, 11:38

Image не поддерживает gif, для поддержки нужны доп модули типа GifImage...

@Pavelll · 03.09.2010, 12:07 **[ТС]**

Сообщение от Vas-e-na

Image не поддерживает gif, для поддержки нужны доп модули типа GifImage...

если вручную добавлять в компонент TImages картинку загруженую то она норм загружается,а программно вот такая ошибка..

@anonimus · 03.09.2010, 12:16

так добавь в раздел uses jpeg (для *.jpg)
и будет тебе счастье

Fix777 · 03.09.2010, 15:41

Можно ещё использовать в место Image JvGIFAnimator из набора JVCL (JEDI)

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
procedure TForm2.Button3Click(Sender: TObject);
var memStream: TMemoryStream;
begin
 memStream := TMemoryStream.Create;
  try
 IdHTTP1.Get('http://love.fowap.ru/icode.php?5075&amp;icq2=c7532894a84ff213d7625ed7110a49e1', memStream);
   except 
    ShowMessage('не найдено');
    Exit;
  end;
  try
    memStream.Position := 0; 
    JvGIFAnimator1.Image.LoadFromStream(memStream); 
  finally
    memStream.Free;
  end;
end;

Грузит без проблем...

Новые блоги и статьи Все статьи Все блоги /
Winforstrap или красявый дизайн своими руками на HTML+JS+Winforms anomal6 04.03.2025 Сидел тут вечером ковырял проект на MAUI, и как же глупо создаются пакеты MSIX и система обновлений пакета публикации, но не об этом. Бывает нужен современный дизайн программы а писать на MAUI,. . .	Формат данных для симуляции физики, посредством распространённых не обученных моделей. Hrethgir 04.03.2025 Что-то как-то снова потерялось, зато катангенсы закатангесились в одном сообщении. На днях писал, что планирую для работы апгрейдить (на этот раз удачно) девайс для работы (конкретно - здоровья для,. . .	Концепция variadic CoderHuligan 04.03.2025 Мне не очень нравится (а кому это нравится?) что у нас есть отдельно компилятор, отдельно линковщик, причем со своим собственным командным языком. При этом усложнении надо знать помимо языка. . .	Java Record или Kotlin Data Class: что лучше для неизменяемых данных Wired 04.03.2025 Java Record и Kotlin Data Class — два мощных инструмента для обуздания неизменяемых структур данных, каждый со своим уникальным подходом к решению этой задачи. История их появления весьма. . .	Создание производительных API с Java и gRPC Wired 04.03.2025 В мире микросервисной разработки вопрос производительности часто становится краеугольным камнем. И хотя REST API давно завоевал сердца разработчиков своей простотой и интуитивностью, при высоких. . .
Что нового в JDK 24 Wired 04.03.2025 JDK 24 — это настоящий прорыв в эволюции Java, который кардинально меняет правила игры. В этом релизе разработчики Oracle наконец-то довели до ума множество критически важных улучшений в. . .	Разработка блокчейн с использованием Java: смарт-контракты и dApp Wired 04.03.2025 Погружаясь в мир блокчейн-разработки на Java, разработчик получает доступ к внушительному арсеналу инструментов. В отличие от Solidity, который "заперт" в экосистеме Ethereum, Java предоставляет. . .	WebAssembly в Kubernetes stackOverflow 03.03.2025 В современной экосистеме облачных технологий WebAssembly (Wasm) становится все более значимым компонентом, предлагая уникальный подход к выполнению кода в распределенных системах. Эта технология. . .	GitHub Actions или Jenkins: Выбираем CI/CD платформу stackOverflow 03.03.2025 Непрерывная интеграция и развертывание (CI/ CD) изменили подход к разработке программного обеспечения, превратив его в бесшовный процесс от написания кода до развертывания в продакшн. GitHub Actions и. . .	Автоматизация тестирования Pull Request в Kubernetes: Интеграция с GitHub Actions и GKE stackOverflow 03.03.2025 Масштабные проекты с использованием Kubernetes требуют надежной системы тестирования изменений перед их внедрением в продакшн-среду. Традиционный подход с ручной проверкой Pull Request не справляется. . .

@Vas-e-na 420 / 417 / 79 Регистрация: 21.06.2010 Сообщений: 1,362
	03.09.2010, 00:48	2
	1. Вы уверены что получаете картинку в правильном формате (т.е. файл не поврежден)??? 2. Почему бы напрямую из МемориСтрим не загрузить в ТИмадже??? 0

@Pavelll 1 / 1 / 0 Регистрация: 25.08.2009 Сообщений: 18
	03.09.2010, 00:51 [ТС]	3
	Сообщение от Vas-e-na 1. Вы уверены что получаете картинку в правильном формате (т.е. файл не поврежден)??? 2. Почему бы напрямую из МемориСтрим не загрузить в ТИмадже??? 1.да уверен,картинка на компьютере нормально открывается, 2.не знаю,все равно та же ошибка.. 0

@Vas-e-na 420 / 417 / 79 Регистрация: 21.06.2010 Сообщений: 1,362
	03.09.2010, 01:04	4
	Сообщение от Pavelll 1.да уверен,картинка на компьютере нормально открывается, к сожалению это не аргумент... в подтверждение этого просто в гугле вбейте ошибку и сразу поймете 2 вещи: 1. Делфи не дружит с джепегом 2. Одназначно проблема с самим файлом... 0

@Pavelll 1 / 1 / 0 Регистрация: 25.08.2009 Сообщений: 18
	03.09.2010, 01:14 [ТС]	5
	короче как я понял,надо конвертировать его в png и потом выводить? 0

Fix777 17 / 17 / 4 Регистрация: 20.08.2010 Сообщений: 128
	03.09.2010, 05:55	6
	Перешел по вашей ссылке с капчей и посмотрел свойства... Тип: Изображение GIF 0

@Puporev Почетный модератор 64306 / 47603 / 32742 Регистрация: 18.05.2008 Сообщений: 115,181
	03.09.2010, 06:53	7
	1. Делфи не дружит с джепегом Почему? Нужно добавить модуль jpeg, а при загрузке этого типа файла через Объект Инспектор, он сам добавляется. 0

@flatgad geJI<\|>eP 188 / 187 / 19 Регистрация: 22.07.2010 Сообщений: 735
	03.09.2010, 08:53	8
	Можешь использовать компонент из JVCL называется JvImage он открывает (cur, pcx, ani, jpg, jpeg, bmp, ico,emf, wmf форматы). Если надо формат PNG то на торри компонент PNG Componets Plus v.1.00. посмотри может поможет. А вообще как люди пишут надо проверять сигнатуру файла может это вообще не картинка а какой небудь архив или ехе файл. 0

@Vas-e-na 420 / 417 / 79 Регистрация: 21.06.2010 Сообщений: 1,362
	03.09.2010, 11:38	10
	Image не поддерживает gif, для поддержки нужны доп модули типа GifImage... 0

@Pavelll 1 / 1 / 0 Регистрация: 25.08.2009 Сообщений: 18
	03.09.2010, 12:07 [ТС]	11
	Сообщение от Vas-e-na Image не поддерживает gif, для поддержки нужны доп модули типа GifImage... если вручную добавлять в компонент TImages картинку загруженую то она норм загружается,а программно вот такая ошибка.. 0

@anonimus 2184 / 1255 / 143 Регистрация: 28.04.2010 Сообщений: 4,592
	03.09.2010, 12:16	12
	так добавь в раздел uses jpeg (для *.jpg) и будет тебе счастье 1