Показать сообщение отдельно
  #1  
Старый 18.06.2010, 13:00
Аватар для infobos
infobos infobos вне форума
Начинающий
 
Регистрация: 29.12.2009
Сообщения: 123
Репутация: 37
По умолчанию RichEdit Можно какнибудь формат RTF загнать в переменную и работать с данными RTF

Привет всем!

Люди добрые и умные программисты помогите пожалуйста!
Я пишу программу справочник Омега может кто знаком. Проблемма с компонентом RichEdit в нем есть формат RTF.
Вопрос:
1. Можно какнибудь формат RTF загнать в переменную и работать с данными RTF ?
2. Как из переменной RTF вытащить все необходимые данные. Например указать строку и символ в ней и вытащить свойства Tfont (color,charset,height и другие свойства).

На данный момент я в компоненте RichEdit указываю расположение курсора и вытаскиваю от туда свойства командами:

lper2:=Form1.RichEdit1.Paragraph.FirstIndent;
rper2:=Form1.RichEdit1.Paragraph.RightIndent;
Charset2:=Form1.RichEdit1.SelAttributes.Charset;
color2:=Form1.RichEdit1.SelAttributes.Color;
Height2:=Form1.RichEdit1.SelAttributes.Height;
Name22:=Form1.RichEdit1.SelAttributes.Name;
Pitch2:=Form1.RichEdit1.SelAttributes.Pitch;
Size2:=Form1.RichEdit1.SelAttributes.Size;
Style2:=module.stylet(Form1.RichEdit1.SelAttribute s.Style);

Этим методом программа очень долго работает!
Подскажите какие еще варианты есть?

Для полного понятия как работает программа можете загрузить программу справочник на странице: http://sprav.infobos.ru при сохранение страницы видно как курсор быстро перебигает курсором по полю и собирает информацию о свойстве на каждом символе. И видно, что из-за такой грубой моей выдумки прога долго сохраняет страницу.

В эту программу вложены все мои труды и выдумки и время потрачено не малое.
__________________
Бывает ли человек, хорошим или плохим? Или это всего-лишь наше сознание делает его таковым?
Ответить с цитированием