Source position: rlmetavcl.pas line 53
function ToMetaPenStyle(
aSource: TPenStyle
):TRLMetaPenStyle;