Sharpen example for Delphi

This example increases the sharpness of the bitmap and redisplays the image.

Lead1.Sharpen(100);
Lead1.ForceRepaint;