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
| Demos\ImageEditing\AnimatedGIF\AnimatedGIF.dpr |
// 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