![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
jpeg
mahab © (2006-10-23 19:36:00)Здравствуйте! У меня есть испорченный JPEG. Хотелось бы адекватно обработать исключительную ситуацию "Jpeg error #42" на загрузку в компонент Timage.Блок Try ... Except..end не помогает.
Dmitrij_K (2006-10-23 19:50:00) [21]
> Примерно так:
> If not OpenPictureDialog1.Execute then exit;
> Try
> Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
> except
> showmessage('Файл испорчен или недоступен');
> end;
> Try ... Except..end не помогает.
помогает
mahab (2006-10-23 19:48:00) [22]Кстати попробуйте создать пустой текстовый файл измените расширение м загрузить в Timage с таким кодом.
mahab (2006-10-23 19:45:00) [23]Примерно так:
If not OpenPictureDialog1.Execute then exit;
Try
Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
except
showmessage('Файл испорчен или недоступен');
end;
Ketmar (2006-10-23 19:39:00) [24]>[0] mahab(c) 23-Oct-2006, 19:36
>Блок Try ... Except.. end не помогает.
а не пробовал кроме упоминания на форуме ещё и в исходный код его вписывать? %-)
если "не помогает", то что-то ты делаешь неверно. код показывай.
Dmitrij_K (2006-10-23 19:38:00) [25]
> Try ... Except..end не помогает.
Чё, правда?