function WideIsDelimiter(const Delimiters: WideString; const S: WideString; Index: Integer): Boolean;

TntSysUtils

TNT-WARN IsDelimiter