PaintIntensity example for Delphi

This example increases the intensity for painting images.

Lead1.PaintIntensity := Lead1.PaintIntensity + 100;
Lead1.ForceRepaint();