|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
25.08.2009, 18:59 | #1 |
Пользователь
Регистрация: 31.07.2009
Сообщений: 89
|
Как найти количество n-ого символа в строке?
Есть строка. Мне надо узнать сколько раз в этой строке встречается заданный ранее символ. Думал с помощью pos, но он ищет только до первого встретившегося символа.
|
25.08.2009, 19:03 | #2 |
Форумчанин
Регистрация: 22.02.2009
Сообщений: 875
|
Просматривайте строку в цикле:
В Edit1 строка; В Edit2 символ. Код:
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство.
Последний раз редактировалось Neeter; 25.08.2009 в 19:30. |
25.08.2009, 19:24 | #3 |
Участник клуба
Регистрация: 28.07.2009
Сообщений: 1,510
|
Поправочка:
Код:
|
25.08.2009, 19:25 | #4 |
Форумчанин
Регистрация: 22.02.2009
Сообщений: 875
|
А что я не так написал? вроде тоже самое вы и написали...
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство.
|
25.08.2009, 19:27 | #5 |
Форумчанин
Регистрация: 19.06.2009
Сообщений: 896
|
У вас написанно: Length(Edit1.Text) - 1
Зачем -1? |
25.08.2009, 19:28 | #6 |
Участник клуба
Регистрация: 08.03.2008
Сообщений: 1,537
|
То же самое в виде функции и без -1 после Length(Edit1.Text):
Код:
|
25.08.2009, 19:30 | #7 |
Форумчанин
Регистрация: 22.02.2009
Сообщений: 875
|
ААА, теперь заметил, ну -1 по привычке)
С единицы начал ведь, а дальше забыл) Исправил.
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство.
|
25.08.2009, 20:25 | #8 |
Участник клуба
Регистрация: 28.07.2009
Сообщений: 1,510
|
Вавел из ГМТУ, Gorychev, зачем повторять уже написанное?)
Neeter, delphi 2009? Тож иногда забываю про -1) |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Поиск и удаление символа в строке | Karl_Karlovi4 | Общие вопросы Delphi | 14 | 26.10.2011 18:04 |
Номер символа в строке | Veroonya | SQL, базы данных | 4 | 24.08.2009 15:04 |
как в строке вставить n-ое количество пробелов | Marinka91 | Паскаль, Turbo Pascal, PascalABC.NET | 18 | 14.08.2009 13:33 |
поиск в строке символа | IvanM | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 2 | 02.06.2009 22:27 |
Удаление символа в строке | Fantom | Общие вопросы Delphi | 2 | 23.06.2008 16:03 |