VPF::Проблема с RichEdit - Форум программистов

Teran

Дата 27.9.2006, 12:43 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 590
Регистрация: 9.9.2005
Где: Украина, Запорожь е

Репутация: нет
Всего: 3

Мне необходимо заменять,добавлять или удалять некоторые слова в RichEdit-е
но когда делаю так:

Код


RichEdit1.Lines.Text=S := StringReplace(RichEdit1.Lines.Text, 'Test', 'Test1', [rfReplaceAll, rfIgnoreCase]);

текст то заменяется, но теряется полностью все форматирование текста,
как можно заменять,добавлять или удалять текст в RichEdit-е без потери форматирования?
smile

--------------------

Ни цего не понимаю

Alexeis

Дата 27.9.2006, 12:58 (ссылка)

(нет голосов)

Загрузка ...

Амеба

Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 109
Всего: 459

Код


procedure TForm1.btn1Click(Sender: TObject);
var
  p : cardinal;
begin
  p := pos('temp', redt1.Lines.Text);
  redt1.SelStart := p -1;
  redt1.SelLength := 4;
  redt1.SelText := 'temp1'
end;

Добавлено @ 13:02
Если надо все вхождения, то использовать posEx (с параметром позиции начала поиска), и проводить операцию в цикле.

--------------------

Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »