Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

каким образом можно узнать, что в конце находятся ... [D5, WinXP]


AlexLines ©   (2005-10-14 02:37:00) 

Уважаемые знатоки!

Есть строка:

abc ! abc ! aaa ! asdf ! ! !

каким образом можно узнать, что в конце находятся три или болеевосклицательных знаков и удалить их не удаляя восклицательных знаков между словами

Спасибо


AlexLines   (2005-10-14 06:23:00) [1]

Спасибо!


ЮЮ   (2005-10-14 03:27:00) [2]

Если, конечно, 2 или 1 восклицательных знака в конце удалять не надо, то мой код неверен


ЮЮ   (2005-10-14 03:25:00) [3]

s :=Trim(исходная строка>) ;
while (s <> '') and (s[Length(s)] = '!') do
 s := Trim(Copy(s, 1, Length(s) - 1));


Наверх

Титульная страница Поиск, карта сайта Написать письмо