Despeckle example for Delphi

This example automatically removes specks from the bitmap and repaints the image. Use this on a 1-bit bitmap such as a scanned document.

Lead1.Despeckle;
Lead1.ForceRepaint;