![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Работа с 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]Проверил - у меня ошибок никаких нет.