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