Applies basic morphology operators (Erode/Dilate) on Image using given structuring element Strel.

procedure Morphology(var Image: TImageData; 
                     const Strel: TStructElement; 
                     Op: TMorphologyOp);

ImagingBinary (at line 61)

You can do composite operations (Open/Close) by calling this function twice each time with different operator.