Source position: pixtools.pp line 27
procedure FillRectangleHashVertical(
Canv: TFPCustomCanvas;
const rect: TRect;
width: Integer;
const c: TFPColor
);procedure FillRectangleHashVertical(
width: Integer
);