Bladeren bron

optimize Gif frames

Johann ELSASS 4 jaren geleden
bovenliggende
commit
4dfda41efe
1 gewijzigde bestanden met toevoegingen van 1 en 0 verwijderingen
  1. 1 0
      lazpaint/image/uimage.pas

+ 1 - 0
lazpaint/image/uimage.pas

@@ -677,6 +677,7 @@ begin
       gif.ReplaceFullFrame(newFrameIndex, RenderedImage, gif.FrameDelayMs[newFrameIndex]);
     end;
 
+    gif.OptimizeFrames;
     s := FileManager.CreateFileStream(AOutputFilename,fmCreate);
     try
       gif.SaveToStream(s);