Hi Nigel. Thanks for the information. But how to use it. Where to add gPNGAlphaThreshold in the program? Thank you.
ImageEnView1 := TImageEnView.Create(nil);
with ImageEnView1 do begin
IO.LoadFromFile( 'Cover.png' );
Proc.Resample(400, 400, rfLanczos3, True);
Proc.ConvertTo(256, ieThreshold); //Reduce colors
Proc.Sharpen(10,4);
IEBitmap.PixelFormat := ie8p; // Set PixelFormat to 8bit
IEGlobalSettings().AutoSetBitDepth := True;
OutputFilename := 'Folder.png';
IO.Params.PNG_Compression := 8;
IO.SaveToFile(OutputFilename, ioPNG); // Save it
Free;
end;
Rudolf
Search
Change the palette to 256 color
Posted - Feb 10 2022 : 10:14:50
