RSS订阅 | 匿名投稿
您的位置:网站首页 > 字符串 > 正文

delphi 字符或符号在字符串出现的次数

作者:admin 来源: 日期:2018/2/15 18:00:07 人气: 标签:

function SymbolEntersCount(s: string; ch: char): integer;
var
i: integer;
begin
Result := 0;
if Trim(s) <> '' then
   for i := 1 to Length(s) do
     if s[i] = ch then
       inc(Result);
end;

读完这篇文章后,您心情如何?
0
0
0
0
0
0
0
0
本文网址:
下一篇:没有资料