Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Работа с JPEG [D6, WinXP]


Popovich A. ©   (2004-07-14 10:42:00) 

Всех приветствую и прошу подсказки у мастеров Delphi  и не только
В частности  исполнение вот такой процедуры

procedure TForm1.Button1Click(Sender: TObject);
begin
     OpenPictureDialog1.Filter := GraphicFilter(TGraphic);
     if openpicturedialog1.Execute then
     begin
       image1.Picture.LoadFromFile(openpicturedialog1.FileName);
     end;
end;

на этапе выбора файла *. JPG в диалоге выдает сообщение следующего содержания
Project1.exe raised exception class EJPEG with message ‘Jpeg error #52’.
При этом в разделе USES  модуль Jpeg указан.

За любую подсказку заранее очень признателен и благодарен


Огромное Кулясищще   (2004-07-14 14:28:00) [1]

Почитай:
http://www.efg2.com/Lab/Library/Delphi/Graphics/JPEGSentinels.pas.txt


Ozone   (2004-07-14 14:10:00) [2]

Проверил - у меня ошибок никаких нет.


Наверх

Титульная страница Поиск, карта сайта Написать письмо