PaintIntensity example for Delphi

This example increases the intensity for painting images.

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