IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

 
 Ответить  Открыть новую тему 
> программа поиска символов в строке
сообщение
Сообщение #1





Группа: Пользователи
Сообщений: 1
Пол: Женский

Репутация: -  0  +


мне нужно определить сколько раз во введенном предложении встретились буквы "п", "р", "С". Есть ли какая-нибудь функция в делфи для поиска символов в строке?
и еще, как проверить строку на НЕпустоту?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Бывалый
***

Группа: Пользователи
Сообщений: 206
Пол: Мужской

Репутация: -  3  +


Функция Pos возвращает позицию первого вхождения подстроки Substr в заданную строку S.

function Pos(Substr: string; S: string): Integer;

Пример (из стандартной справки)

Код
var S: string;

begin
  S := '   123.5';
  { Заменяет пробелы нулями }
  while Pos(' ', S) > 0 do
    S[Pos(' ', S)] := '0';
end;

Кстати, из этого примера несложно сделать и подсчет вхождений.

Далее: функция Trim удаляет из строки ограничивающие пробелы. Если в строке ничего, кроме пробелов нет, Trim вернет пустую строку. Поэтому:
Код
If Trim(BlaBlaBla)='' then Writeln('строка BlaBlaBla пустая');

По-моему, так.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 10.11.2024 8:56
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name