Форум: "Основная";
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];

Вниз

StringReplace   Найти похожие ветки 

← →
LiNkS   (2002-03-27 16:06) [0]

Кто-нибудь может написать полный пример работы этой функции, а то я как ни делаю - все ошибка выдается... :(

---

← →
Alx2   (2002-03-27 16:15) [1]


procedure TForm1.Button2Click(Sender: TObject);
Var S : String;
begin
S := "Однажды, в студеную зимнюю пору, я из лесу вышел.";
S := StringReplace(S,","," боком,",[rfReplaceAll]);
S := StringReplace(S,"."," раком.",[rfReplaceAll]);
end;


Потом смотрим S - все работает.

---

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

Форум: "Основная";
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.006 c