Recent

Author Topic: BGRA and thumbnails  (Read 1575 times)

winni

  • Hero Member
  • *****
  • Posts: 2857
BGRA and thumbnails
« on: October 29, 2021, 06:40:58 pm »
Hi

As a result of a discussion in another thread I started to search for BGRA and thumnails. The discussion is here:

https://forum.lazarus.freepascal.org/index.php/topic,56896.msg422858.html#msg422858


And - as so often - I detected that there is a simple to use function :

Code: Pascal  [Select][+][-]
  1. function GetStreamThumbnail(AStream: TStream; AWidth,AHeight: integer; ABackColor: TBGRAPixel; ACheckers: boolean; ASuggestedExtensionUTF8: string = ''; ADest: TBGRABitmap= nil): TBGRABitmap; overload;
  2.  

You can use this function for all important graphic file formats and it return a thumbnail BGRAbitmap. Smart and easy.  And fast.

For the use I made a little demo name PhotoExplorer.

Project and screenshot in the attachment.


Winni

 

TinyPortal © 2005-2018