Работа с константами и текстом.

← →
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);

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

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