var
s: string;
b: Boolean;
begin
s := 'CodeDear Delphi';
b := IsDelimiter('de', s, 3);
ShowMessage(BoolToStr(b)); {返回 -1, 就是 True}
end;
SysUtils 单元下的公用函数目录
举例:
转载于:https://my.oschina.net/hermer/blog/319114