Главная страница
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.021 c
4-85761
malakai
2002-08-09 18:28
2002.09.26
закрытие всех форм проложения


1-85609
bedny
2002-09-14 20:02
2002.09.26
sc_data.txt --> TreeWiev


1-85463
PONTIY
2002-09-16 12:51
2002.09.26
Выдвинуть CD-ROM


6-85627
Gregson
2002-07-25 14:04
2002.09.26
OFF: очень нужна помощь


1-85447
Roalse
2002-09-16 02:18
2002.09.26
мастера на счёт Virtual Drive