Вниз
Скачать: 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.022 c
14-1100801883
Drakon
2004-11-18 21:18
2004.12.05
Предпятничная задача


4-1098023519
#Мастер#
2004-10-17 18:31
2004.12.05
Hook на всё


9-1091703136
pavel_pavel
2004-08-05 14:52
2004.12.05
TBitmap побыстрее


1-1101227757
fashionguide
2004-11-23 19:35
2004.12.05
Вопрос с работой курсора


3-1099901646
Меверик
2004-11-08 11:14
2004.12.05
Наименования полей!




   Наверх