Source position: agraphics.pas line 2296
function SetAOlPen(
Rp: PRastPort;
Pen: LongWord
):LongWord;