Thanks for the tip, looks pretty nice.

One little suggestion:

Your website available on http://imaginglib.sourceforge.net/ indicates that the project has not been continued since 2012.

I would update the date to 2018, otherwise users would think that the project is dead.

When loading an animated multiframe GIF with the function LoadMultiImageToFile and save it with SaveMultiImageToFile, the playback speed of the frames set in the original file is ignored. Instead, it is always set a time of 65/100 second.

I am using the newest version of Vampyre Imaging Library, default branch from sourceforge with FPC Lazarus.

Is there any possibility to save or set the delay?

I wish to share this find with galfar and the rest here, it's related to processing 16 bit floating point values:

http://www.fox-toolkit.org/ftp/fasthalffloatconversion.pdf

There is already a pascal implementation of this that i have found:
https://github.com/SAmeis/xplib/blob/master/DeHL/Library/src/Math/DeHL.Math.Half.pas

I hope you find it useful, surely a lookup table based solution with no cpu code branching is a big improvement if you process 16 bit floating point values regularly.

Hello,

I found a problem using the latest version of lazarus (1.8.0 64bit FPC 3.0.4) in debug mode. On Windows 10 64bit.

In the imjmorecfg.pas file I saw:

uInt = Cardinal;

This I think is a problem for 64bit systems

For FPC if I replace with
uInt = NativeUInt
I do not perform more dangerous crashes

Also I think there is a similar problem (I have not tested) for:
imzutil.pas

uInt = cardinal; -> NativeUInt
ptr2int = uInt; -> PtrUInt
(but the message "Nomssi" under "ptr2int" is not very clear)

I noticed that through the lazarus compiler, several "warning" and "hint" messages appear.
For "justified Hints" it is possible to disable them (to avoid having to run many already verified messages).

example
FillChar(TmpInfo, SizeOf(TmpInfo), 0); show variable message not initialized
it is due to the use of "var" but here it is correct then
FillChar({%H-}TmpInfo, SizeOf(TmpInfo), 0);
avoid the message (it is filtered by lazarus itself)

Finally, the compilation on the ImagingPcx.pas unit is blocked
ifMono: TImageFormat = TImageFormat (250); ...
I do not know if it's correct.
I know that the SizeOf () dimension of the "enum" types can change depending on the number of elements.
The compiler writes:
ImagingPcx.pas(91,43) Error: range check error while evaluating constants (250 must be between 0 and 206)

(sorry for my English)

Thanks

Hello,
Thanks for the reply  :)!
So it is not possible, replace the "transparent color" during the conversion to make the process faster  :(.

I have looked into the code of ImagingOpenGL.pas and found something weird:

function CreateMultiImageFromGLTexture(const Texture: GLuint;
  var Images: TDynImageDataArray; MipLevels: LongInt; OverrideFormat: TImageFormat): Boolean;
var
  I, Width, Height, ExistingLevels: LongInt;
begin
  FreeImagesInArray(Images);
  SetLength(Images, 0);
  Result := False;
  if Byte(glIsTexture(Texture)) = GL_TRUE then
  begin
    // Check if desired mipmap level count is valid
    glBindTexture(GL_TEXTURE_2D, Texture);
    if MipLevels <= 0 then
      MipLevels := GetNumMipMapLevels(Width, Height);  //<- Here it tries to access uninitialized memory (Line 849)
    SetLength(Images, MipLevels);


A possible fix would be:
         
    if MipLevels <= 0 then
      begin
        glGetTexLevelParameteriv(GL_TEXTURE_2D, 0, GL_TEXTURE_WIDTH, @Width);
        glGetTexLevelParameteriv(GL_TEXTURE_2D, 0, GL_TEXTURE_HEIGHT, @Height);
        MipLevels := GetNumMipMapLevels(Width, Height);
      end;


If you just add only the library file (lpk) to a blank Lazarus project as it is (without changing any library or unit paths), you get the following error:

ImagingTiff.pas(42,3) Fatal: Cannot find ImagingTiffLib used by ImagingTiff.

I think there is just missing a dependency within the package. But I cannot find where and how to fix it...

Very good to hear that you are working on a solution.

Yes, I think so, too. Then it is much better to use the solution like Windows than relying on an external library.

If I understand it correctly, you need to create one image and fill it with your desired background color. Then load your PNG to another image and draw it over the first image with alpha blending. Finally, save the result to a bitmap.