Source position: graphh.inc line 770
procedure SetFillPattern(
Pattern: FillPatternType;
Color: ColorType
);