TJPEGImage ?!

Problema mi e slednia.

Triabva da zaredia edna kartinka v jpeg, da dorisuvam neshto(nadpisi) i da go zapisha otnovo kato jpeg.
Borih se s TJPEGImage no nemoga da izmakna Canvas. V Help-a e opisana DIBNeeded, no neshto ne shvanah kak da ia izpolzvam.
Ako niakoi ima ideia - da pomogne.

Izvinete, ako se povtariam.

Има много графични библиотеки, които могат да ти свършат работа.
Според мен graphics32 ([линк]) е може би най-добрата безплатна такава.

може да минеш през Bitmap:

var

  Bitmap:TBitmap; 

  Picture:TPicture;

  Jpeg:TJpegImage;

begin

  Picture := TPicture.Create;

  Bitmap := TBitmap.Create;

  try

    Picture.LoadFromFile(filename);

    Bitmap.Width := Picture.Width;

    Bitmap.Height := Picture.Height;

    Bitmap.Canvas.Draw(0, 0, Picture.Graphic);

    //pravish kakvo pravish s Bitmap-a 

   Jpeg := TJpegImage.Create; 

   try

      Jpeg.Assign(Bitmap);

      Jpeg.SaveToFile(filename);

    finally

      Jpeg.Free;

    end;

  finally

    Picture.Free;

    Bitmap.Free;

  end;

end;

Може да е малко грешен кода но схващаш идеята.

AquilaX

____________
умният знае кога да говори, мъдрият знае кога да мълчи

Blagodaria ti!
Tova svarshi rabota :)
Ideiata mi beshe da izpolzvam samo edin grafichen element, bez da poddarjam ednovremenno i jpg i bmp w pametta - bmp-a e dosta goliam, no pak ot durga strana jpg e malko i shte kompensira.

Oshte vednaj, Blagodaria!