BinaryFilter example for Delphi

This example does omni-directional erosion of black objects and repaints the image.

Lead1.BinaryFilter(BFLT_EROSION_OMNI);
Lead1.ForceRepaint;