TImageEnProc.OnFinishWork

Declaration

property OnFinishWork: TNotifyEvent;

Description

Occurs whenever an image processing task terminates. This event is called after the last call to OnProgress, so is useful to reset the progress bar.

Example

// Show progress display during processing operations
procedure TMDIChild.ImageEnView1Progress(Sender: TObject; per: Integer);
begin
  ProgressBar1.Position := per;
  ProgressBar1.Visible := True;
end;

// Hide the progress bar
procedure TMDIChild.ImageEnView1FinishWork(Sender: TObject);
begin
  ProgressBar1.Visible := False;
end;

TImageEnProc.OnFinishWork