BinaryFilter example for Visual Basic

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

Dim RasterProc As New LEADRasterProcess
LEADRasterView1.Raster.UnlockSupport L_SUPPORT_DOCUMENT, "TestKey"
RasterProc.BinaryFilter LEADRasterView1.Raster, BFLT_EROSION_OMNI
LEADRasterView1.ForceRepaint