procedure Grow(x: integer; y: integer); overload;

This is Grow, a member of class CRectangle.