Вниз
Скачать: 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.025 c
3-1099918293
LOMic
2004-11-08 15:51
2004.12.05
фильтрация в TDBGrigEh


3-1099639485
diabolik_krsk
2004-11-05 10:24
2004.12.05
Сохранение данных их ComboBox в Access


9-1091467989
P@uk
2004-08-02 21:33
2004.12.05
Движение и торможение


6-1096023735
Wolfram
2004-09-24 15:02
2004.12.05
Работа с vCard


1-1100680533
Fishka
2004-11-17 11:35
2004.12.05
MainMenu - надо огромными жирными буквами и по ширине побольше




   Наверх