Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Сохранение rtf с помощью TRichEdit.


infom ©   (2007-11-17 13:35:00) 

Уважаемые мастера у меня возникла проблема при работе с RichEdit.
Она заключаетс в следующем:
У меня на форме есть RichEdit , в него загружается rtf файл с шаблоном документа.
Далее с помощью функций я в richedite заменяю определенные части документа на нужные мне значения, тем самым формирую готовый документ.
Теперь мне надо сохранить этот документ в формате rtf.
1. При попытке сохранения свойства Lines, сохраняется текст а не rtf.
2. Уставновка свойства PlainText = true перед непосредственно сохранением ничего не менят.
3. Установка свойства PlainText = true перед загрузкой шаблона не возможна так как , потом не получается искать текст который нужно заменять методом FindTexT.

Посоветуйте как поступить.


infom   (2007-11-17 14:18:00) [1]


> Anatoly Podgoretsky

Только об этом сейчас и хотел написать. Очень интересна особенность.


Anatoly Podgoretsky   (2007-11-17 14:04:00) [2]

Недостаточно сменить свойство, надо чтобы и расширение у файла было .rtf


infom   (2007-11-17 14:00:00) [3]

Странно но помогло вот это
RichEdit.PlainText := False;
RichEdit.Lines.SaveToFile('C:\1.rtf');

Хотя свойство PlainText до этого кода тоже было равно False.


infom   (2007-11-17 13:56:00) [4]

PlainText имеет значение по умолчанию False.
Если так и сохранять то сохраняет простой текст.
Если установить True то продолжает сохранять простой текст.


Hint   (2007-11-17 13:47:00) [5]

Насколько я помню, PlainText = true наоборот говорит о том, что надо сохранить просто текст, а не rtf.


homm   (2007-11-17 13:42:00) [6]

Смотри реализацию в КОЛ, конкретнее метод RE_SaveToStream


Наверх

Титульная страница Поиск, карта сайта Написать письмо