Вниз
Скачать: CL | DM;

Работа с константами и текстом.   Найти похожие ветки 

 
markers ©   (2004-11-22 12:15) [0]

Чё-то не могу придумать алгоритм и воплатить его.... Имеем две константы
 BedWords: array[1..3] of string =
  ("трафик","траффик","один");
 ReplaceBedWords: array[1..3] of string =
  ("траф<ик","траф<ик","оди<н");

А так же есть строка TempMessage, вообщем нужно пробежатся по этой строке найти и заменить слова ноходящиеся в константах, причем слова могут встречатся одинаковые несколько раз, ясно дело что это должно быть верно, но как сделать чтоб проверялись все слова сразу и не делать по тупому
   if BMSearch(0,TempMessage,BedWords[1]) = True Then ...

И что лучше всего использовать в данной ситуации While или For?
Заранее спасибо...


 
markers ©   (2004-11-22 12:21) [1]

"что это должно быть верно" - "что это должно быть в цикле"


 
Плохиш ©   (2004-11-22 12:31) [2]

StringReplace для каждого элемента массива констант.


 
markers ©   (2004-11-22 12:44) [3]

To Плахиш. Спасибо тебе, но чё-то не могу указать ему последний параметр, сделал как в хелпе, но материт        StringReplace(TempMessage,BedWords[WordsItem],ReplaceBedWords[WordsItem],rfReplaceAll);


 
markers ©   (2004-11-22 12:54) [4]

Спасибо всем, разобрался.... Буду проверять...
Кому интересно вот:
"TempMessage:=StringReplace(TempMessage,BedWords[WordsItem],ReplaceBedWords[WordsItem],[rfReplaceAll]+[rfIgnoreCas e]);"



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.024 c
1-1101219072
jenbond
2004-11-23 17:11
2004.12.05
Экспорт в doc or rtf из FastReport


1-1100684507
Богдан
2004-11-17 12:41
2004.12.05
Заполнение полей TEdit


14-1100525614
YurikGL
2004-11-15 16:33
2004.12.05
Internal Server Error


8-1094316563
Sfinks
2004-09-04 20:49
2004.12.05
Анимированый *.jif


6-1095639045
Лев Ландау
2004-09-20 04:10
2004.12.05
Экономия трафика ложь или быль? (IdHTTP)




   Наверх