var
  ImageEnMView: TImageEnMView;

begin
  ImageEnMView := TImageEnMView.Create(Nil);
  ImageEnMView.Proc.AutoUndo := false;

  try  
    ImageEnMView.MIO.LoadFromFileTiff(SrcFileTIF);

    ImageEnMView.SelectedImage := 0;
    ImageEnMView.Proc.AutoSharp(100, 1); 
  finally
    ImageEnMView.Free;
  end; 
end;