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