Source position: _crw_str.pas line 822
function WordCount(
const S: LongString;
const WordDelims: TCharSet
):Integer;