Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.09.26;
Скачать: CL | DM;

Вниз

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

 
dg ©   (2002-09-14 13:17) [0]

Народ подскажите как это можно сделать:
есть текcт в переменной text1:string . Как в нём все символы "c1" заменить, к примеру, на "c2".

Insert("c2",text1,pos("c1",text1));

Заменяет только 1-ый найденный символ, как добиться замены повсему тексту???


 
vikki   (2002-09-14 14:34) [1]

например так:

comp := pos(c1,text1);
while (comp <> 0) do
begin
Insert(c2,text1,pos(c1,text1));
Delete(c2,pos(c1,text1),Length(c1));
comp := pos(c1,text1);
end;



 
Ketmar ©   (2002-09-14 14:44) [2]

а StringReplace не поможет?

Satanas Nobiscum! 14-Sep-XXXVII A.S.



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

Текущий архив: 2002.09.26;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.018 c
1-85585
[WhItE]
2002-09-14 00:29
2002.09.26
Delphi Outlook(Входящие)


1-85580
Октябрь
2002-09-14 12:01
2002.09.26
Фунция случайных чисел


1-85498
DarkGreen
2002-09-16 14:36
2002.09.26
SetConsoleCP & SetConsoleOutputCP


8-85617
a_n_t
2002-05-30 16:40
2002.09.26
rgb -> 16bit


4-85762
anod
2002-08-10 23:31
2002.09.26
В WM_DRAWITEM