Delphi - JPEG error #53

Question

Hello , this is my code :

  TImage.Picture.LoadFromFile('File.jpg');

but i got JPEG error #53 ! what is the reason for this error?

Answer 1

Don't know much about Delphi. But Google does have a few links to offer.

http://support.ornj.net/topic/jpeg-error-53
http://borland.newsgroups.archived.at/public.delphi.graphics/200608/0608152573.html
http://borland.newsgroups.archived.at/public.delphi.graphics/200608/0608152564.html

Answer 2

Does it occur to a single jpeg image or with all jpegs you try?

JPEG error #53 error will come due to Insufficient memory.

If file is corrupted, this error may occur.

So opening this image in paint or photoshop and re-saving it in jpeg can solve the problem.

Answer 3

my problem solved by using TAdvPicture componenet . Thank you

Answer 4

This usually comes when the Jpeg image is downloaded from Internet and the download is not 100% complete. It can happen even with TImage. Unfortunately Jpeg do not have a checksum to check against.

The only think you can do is whenever this error is thrown to catch it and display more responsive message like "The image is corrupted.".

Since this raises the error:

procedure JpegError(cinfo: j_common_ptr); {$IFDEF LINUX} cdecl; export; {$ENDIF}
begin
  raise EJPEG.CreateFmt(sJPEGError,[cinfo^.err^.msg_code]);
end;

where

sJPEGError = 'JPEG error #%d';

you can try to catch EJPEG error and check for #53 within the message.

Since EJPEG inherits from EInvalidGraphic you can simply catch it with

catch
  on E: EInvalidGraphic do
  begin
    ShowMessage('Image file is corrupted.')
  end;
end;