ImageEn, unit iemview

TImageEnMView.OnDrawProgress

TImageEnMView.OnDrawProgress


Declaration

property OnDrawProgress: TIEMProgressEvent;


Description

Occurs as each image is painted.
per returns the number of images completed (painted or skipped because they are off-screen) out of the total number of images in the control. It will reach 100% when all images onscreen have been painted.
idx is the current image being painted.


Example

procedure TForm1.ImageEnMView1DrawProgress(Sender: TObject; per, idx: Integer);
begin
  ProgressBar1.Position := per;
end;