Source position: msestrings.pas line 609
function getasciichar(
const source: msechar;
out dest: Char
):Boolean;