Source position: strutils.pp line 219
function ExtractWord(
N: Integer;
const S: string;
const WordDelims: TSysCharSet
):string;