Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

StringReplace

ясам © (2004-06-30 20:38:00)
Такой код:

s:string; begin s := 'string' + #$D#$A + 'string'; StringReplace(s, #$D#$A, '<br>', [rfReplaceAll]); ShowMessage(s);

Упорно не хочет заменять последовательность. Что не так?

jack128 (2004-06-30 22:06:00) [1]

> >>Adil (30.06.04 20:59) [4]
>
> А зачем использовать свой?
свой даже не скомпилируется.. А уж тормозах промолчим..

Гаврила (2004-06-30 21:53:00) [2]
>>Adil (30.06.04 20:59) [4]

А зачем использовать свой? В стандартном есть еще и поддержка флагов, которая в ряде случаев бывает совсем не лишней

Fay (2004-06-30 21:11:00) [3]
2Adil (30.06.04 20:59) [4]
Ужас

Adil (2004-06-30 20:59:00) [4]
Я незнаю как работает твой StringReplace.
Я использую свой:

function stringreplace(str1,str2,str3:string):string;
bg:integer;
begin
bg:=pos(str1,str2);
if bg<>0 then begin
delete(str2,bg,length(str1));
insert(str3,str1,bg);
end;
end;
Синтаксис правильный или нет незнаю. Но принсип такой.

Fay (2004-06-30 20:46:00) [5]
8)

ясам (2004-06-30 20:42:00) [6]
мдя, вот я тупой, спасибо

Fay (2004-06-30 20:40:00) [7]
StringReplace - функция...

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »