Форматированный текст в Paradox

[DimOn4Ik]

Подскажите пожалуйста как правильно хранить форматированный текст из RichEdit в Paradox..
Делал так:
Создал поле Text формат FormaMemo

Через RichEdit1 + Table1 добавлял в бд.. Через DBRichEdit1 выводил.. не работает

может нужно добавлять с DBRichEdit ?
я пробывал но в DBRichEdit не могу вводить символы..

[maLoy*508]

Через RichEdit1 + Table1 добавлял в бд.. Через DBRichEdit1 выводил.. не работает

что не работает?

п.с. используй правку, не плоди посты друг за другом, а то модераторы могут штраф дать

[DimOn4Ik]

{\rtf1\ansi\deff0{\fonttbl{\f0\fswi ss\fcharset0 Tahoma;}{\f1\fnil MS Sans Serif;}}
{\colortbl ;\red0\green0\blue0;}
\viewkind4\uc1\pard\qr\cf1\lang1033 \i\f0\fs16 reyryery \lang1049\i0\f1
\par }

вот что выводится..или выводится не форматированный.

подскажите с помощью какого компонента добавлять форматированный текст?

[Stilet]

Значит рекомендую вот что.
Все правильно ты поле сделал, но только читай из него не в DBRichEdit а в переменную типа String.
А уже ее присваивай RichEdit1.Text:=Переменная
Тогда должно все нормально работать.
Хотя DBRichEdit тоже не должен выкобениваться.

[DimOn4Ik]

Stilet,можно не большой пример?

т.е. мне добавлять с помощью DBRichEdit,а выводить с RichEdit ?

[Stilet]

Ну пример можно , но у меня не подключен BDE...

т.е. мне добавлять с помощью DBRichEdit,а выводить с RichEdit ?

Да. Верно )
Та и в принципе я бы и добавление сделал на RichEdit а не на DBRichEdit...
У него же есть свойство Text вот его как строку и пиши в МЕМО поле.
И соответственно считывай

Впрочим:
Читать можно так:

procedure TForm1.Table1AfterScroll(DataSet: TDataSet);
begin
 RichEdit1.Text:=DataSet.fieldbyname('notes').AsString;
end;

Это событие OnAfterScroll для Table
Записывать соответственно операторы местами поменяешь

[DimOn4Ik]

спасибо,буду пробовать!

[DimOn4Ik]

не помогло (