Contrast example for Delphi

This example increases the contrast and repaints the image.

Lead1.Contrast(50);
Lead1.ForceRepaint;