Saturation example for Delphi

This example increases the saturation of colors in the bitmap and redisplays the image.

Lead1.Saturation(100);
Lead1.ForceRepaint;