Declaration

TIEWriteImageStream = procedure(Stream: TStream; Bitmap: TIEBitmap; var IOParams: TIOParams; var Progress: TProgressRec);

Description

The procedure to save the image in Bitmap to a Stream.

Use Progress to return progress information (e.g. for 35% progress Progress.val := 35 and Progress.tot := 100) and notify of save failure (Progress.Aborting^ := True).

---