ImageEn, unit ieMIO

TImageEnMIO.SaveToFileGIF

TImageEnMIO.SaveToFileGIF

Declaration

procedure SaveToFileGIF(const FileName: string; SelectedOnly: Boolean = False);

Description

Save all images in the attached TImageEnMView or TIEMultiBitmap as a GIF file.
If SelectedOnly = True and the component is attached to a TImageEnMView then only the selected images are output.

Note:
◼If an internal save error is encountered Aborting will return True. Saving issues due to insufficient write permissions and disk write failures will raise an exception.
◼To abort while saving set Aborting to True
◼To reduce the size of the created GIF file, use IEOptimizeGIF

Demo

Demo  Demos\ImageEditing\AnimatedGIF\GifDemo.dpr

Example

// Create an animated GIF file from ten source images
ImageEnMView1.Clear();
for i := 0 to 9 do
begin
  ImageEnMView1.AppendImage( Format( 'D:\Source\Frame %d.bmp', [i] ));
  ImageEnMView1.MIO.Params[i].GIF_DelayTime := 10; // Display each frame for 1/10th of a second
end;
ImageEnMView1.MIO.SaveToFileGIF( 'D:\Animated.gif' );

See Also

◼IEOptimizeGIF