Source position: extgraphics.pas line 74
procedure PaintCross(
Canvas: TCanvas;
XLeft: Integer;
YUp: Integer;
XRight: Integer;
YLow: Integer;
CrossX1: Integer;
CrossX2: Integer;
CrossY1: Integer;
CrossY2: Integer
);