Source position: GPCStrings.pas line 374
function PosCharInStr15(
theCh: AnsiChar;
const theStr: Str15
):Integer;