procedure TForm1.AdjustBrightnessContrastSaturation1Click(Sender: TObject);
{Adjust Brightness, Contrast, Saturation and SaveToFileJPG}
var
  iBrightness: integer;
  iContrast: integer;
  iSaturation: integer;
  iFilename: string;
begin
{ Brightness can assume values from -100 to 512.
  Contrast can assume values from -100 to 100.
  Saturation can assume values from 0 to 512. }
  iBrightness := 100;
  iContrast := -10;
  iSaturation := 0;
  { This method adjust brightness, contrast and color saturation in one step
    If a parameter is zero, it doesn't that parameter }
  ImageEnView1.Proc.AdjustBrightnessContrastSaturation(iBrightness, iContrast, iSaturation);
  { The quality factor for the current JPEG image. Range is 1 to 100, though
    typical range is 60 (low quality) to 95 (high quality).
    Higher values will improve image quality but require more disk space }
  ImageEnView1.IO.Params.JPEG_Quality := 95;
  ImageEnView1.IO.SaveToFileJpeg(iFilename);
end;