Главная страницаОбратная связьКарта сайта

Получить количество вхождений символа в строку

Автор: ___Nikolay
WEB-сайт: http://delphiworld.narod.ru

// Кол-во вхождений символа в строку
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;

Обсудить статью на форуме


Если Вас заинтересовала или понравилась информация по разработке на Delph - "Получить количество вхождений символа в строку", Вы можете поставить закладку в социальной сети или в своём блоге на данную страницу:

Так же Вы можете задать вопрос по работе этого модуля или примера через форму обратной связи, в сообщение обязательно указывайте название или ссылку на статью!
   


Copyright © 2008 - 2024 Дискета.info