Source position: typshrdh.inc line 133
class function TRect.Intersect(
R1: TRect;
R2: TRect
):TRect;procedure TRect.Intersect(
R: TRect
);