PaintContrast example for Delphi

This example increases the contrast for painting images.

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