JPEG, EXIF et erreur #36

Version imprimable

05/02/2006, 18h05
achambily

JPEG, EXIF et erreur #36

Bonjour à tous.

Bon alors voila. Quand je fais ça :

PROCEDURE SaveToJPG(Bitmap:TBitmap; JPGName:STRING; quality:integer);
VAR JPEG : TJPEGImage;
BEGIN
JPEG := TJPEGImage.Create;
TRY
JPEG.CompressionQuality:=quality; // 100 pour qualité max, 75 = courant
JPEG.Assign(Bitmap);
JPEG.SaveToFile(JPGName);
FINALLY
JPEG.Free
END
END {SavetoJPG};

avec une image assez grosse (genre >2Mo), j'obtiens (de façon aléatoire et pas forcément reproductibe) une erreur JPEG #36... Quelqu'un connait-il la parade ?

D'autre part, quand j'enregistre ainsi un fichier JPG modifié, je perds les données EXIF de l'original... Quelsu'un sait-il comment ne pas les perdre ?
05/02/2006, 19h32
tourlourou

1) ???

2) ton fichier initial doit débuter par : FFD8 FFE1 puisque c'est un EXIF
le mot suivant vaut la longueur de la section EXIF + 2 octets
en sautant cette longueur, le prochain FFD8 marque le début de la photo elle-même.
résumons-nous : tu colles tout ce qui précède ce FFD8 avant le JPEG que tu as sauvé, et hop !

obstacles : la vignette incluse dans les données EXIF ne correspond plus à l'image principale
05/02/2006, 20h16
achambily

oula oula que tout ça est compliqué pour le programmeur amateur que je suis...
moi je veux juste un truc qui charge l'image (avec tout)
qui me laisse faire mes modifs
et qui me resauve le tout sans me péter à la tronche passque le fichier es trop gros...
mais merci quand meme !
05/02/2006, 20h48
Graffito

Bonjour,

Je ne pense pas que les composants VCL standard traite les EXIF.

Peut-être regarder du coté de EXIF disponible avec souces :
http://mcguirez.homestead.com/downloads.html

"dEXIF is a Delphi open source library for reading EXIF information from JPEG image files. It is 100% Delphi, and VCL free.

dEXIF provides a fairly fast way to extract EXIF information from JPEG image files.
dEXIF provides a simple way to extend manufacturer specific information through the msData module. Manufacturer information is provided for Canon, Casio, Fuji, Nikon, and Olympus cameras".
06/02/2006, 20h11
achambily

Citation:

Je ne pense pas que les composants VCL standard traite les EXIF.

en 2006, c quand même triste...
07/07/2006, 15h19
claudemartial

JPEG erreur #36

Je viens de rencontrer ton premier problème (erreur #36).

Je l'ai à chaque fois sur un fichier et je le fait disparaître en diminuant le taux de compression à 75.

Pour les les données EXIF, je ne maitrise pas.
08/07/2006, 12h14
exoseven

essayes d'utiliser jpeg_io pour corriger le bug #36

Code:

1
2
3
4
5
6
7
8
9
  unit JpegErrors;
 
interface
 
const
  cstrJVERSION = '6a  7-Feb-96';
  cstrJCOPYRIGHT = 'Copyright (C) 1996, Thomas G. Lane';
 
cstrJERR_FILE_WRITE = 'Output file write error --- out of disk space?'; // erreur 36