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\AnimatedGIF.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