PaintGamma example for Delphi

This example increases the gamma correction for painting images.

var
   sRet: Smallint;
begin
   LEADRasterView1.PaintGamma:= LEADRasterView1.PaintGamma + 100;
   LEADRasterView1.ForceRepaint (sRet);
end;