ImageEn for Delphi and C++ Builder ImageEn for Delphi and C++ Builder

 

ImageEn Forum
Profile    Join    Active Topics    Forum FAQ    Search this forumSearch
 All Forums
 ImageEn Library for Delphi, C++ and .Net
 ImageEn and IEvolution Support Forum
 TImageEnMView.GetImageToFile

Note: You must be registered in order to post a reply.
To register, click here. Registration is FREE!

View 
UserName:
Password:
Format  Bold Italicized Underline  Align Left Centered Align Right  Horizontal Rule  Insert Hyperlink   Browse for an image to attach to your post Browse for a zip to attach to your post Insert Code  Insert Quote Insert List
   
Message 

 

Emoji
Smile [:)] Big Smile [:D] Cool [8D] Blush [:I]
Tongue [:P] Evil [):] Wink [;)] Black Eye [B)]
Frown [:(] Shocked [:0] Angry [:(!] Sleepy [|)]
Kisses [:X] Approve [^] Disapprove [V] Question [?]

 
Check here to subscribe to this topic.
   

T O P I C    R E V I E W
wesleybobato Posted - Mar 12 2016 : 10:18:52
Hi Nigel.

Please Add the method
fImageEnIO.Params.UpdateEXIFThumbnail();

in the Unit iemview


procedure TImageEnMView.GetImageToFile(idx: Integer; const FileName: WideString);
var
  bmp: TIEBitmap;
begin
  fImageEnIO.Params.Assign( GetImageEnMIO.Params[idx] );
  bmp := GetTIEBitmap(idx);
  try
    fImageEnIO.AttachedIEBitmap := bmp;
    fImageEnIO.Params.UpdateEXIFThumbnail(); //Here Update Thumbnail.
    fImageEnIO.SaveToFile(FileName);
  finally
    ReleaseBitmap(idx, false);
  end;
end;


Thank you very much
2   L A T E S T    R E P L I E S    (Newest First)
wesleybobato Posted - Mar 12 2016 : 13:09:37
Hi William

Thank you very much I was actually with a problem in a thread
I my project.

Best regards.
w2m Posted - Mar 12 2016 : 11:24:44
This method is already present:

TIOParams.UpdateEXIFThumbnail

Declaration
procedure UpdateEXIFThumbnail(Width: integer = 160; Height: integer = -1; ResampleFilter: TResampleFilter = rfTriangle);

Description
Updates the EXIF_Bitmap property with the content of current image.
You should call this method just before saving a JPEG so the thumbnail is consistent with the saved image.

Parameter Description
Width Width of the thumbnail.
Height Height of the thumbnail.
ResampleFilter Interpolation filter to use when resampling.

Example
ImageEnView1.IO.LoadFromFile('C:\input.jpg');
ImageEnView1.Proc.Negative;
ImageEnView1.IO.Params.UpdateEXIFThumbnail;
ImageEnView1.IO.SaveToFile('D:\output.jpg');

Bill Miller
Adirondack Software & Graphics
Email: w2m@hughes.net
EBook: http://www.imageen.com/ebook/
Custom Commercial ImageEn Development