소스 검색

optimize Gif frames

Johann ELSASS 4 년 전
부모
커밋
4dfda41efe
1개의 변경된 파일1개의 추가작업 그리고 0개의 파일을 삭제
  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);