Source position: ovcmisc.pas line 109
function WordCount(
const S: string;
const WordDelims: TCharSet
):Integer;