Source position: GPCStrings.pas line 377
function PosCharInStr32(
theCh: AnsiChar;
const theStr: Str32
):Integer;