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

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

Передать RTF-текст из одного RichEdit в другой без Clipboard-а [WinXP]


Tack ©   (2008-10-23 14:04:00) 

Подскажите, как проще всего вставить RTF-текст (возможно, с OLE-объектами) из одного RichEdit в текст другого RichEdit, не используя буфер обмена?

RTF из RichEdit-источника я кое-как получить могу, но вставить его в позицию курсора другого редактора уже сложно.

Работать на уровне тегов RTF как-то не хочется. Может есть какие-нибудь альтернативные методы?


Leonid Troyanovsky   (2008-10-23 17:56:00) [1]


> Tack   (23.10.08 14:46) [3]

> Надо послать в RichEdit сообщение EM_SETTEXTEX.

http://groups.google.com/group/borland.public.delphi.vcl.components.using/msg/63f022b24603fd65

> Константы не описаны, кстати, так что придется вручную накинуть:

Add richedit to your Uses clause

--
Regards, LVT.


Tack   (2008-10-23 14:46:00) [2]

нашел способ.

Надо послать в RichEdit сообщение EM_SETTEXTEX.
В параметрах там будет указатель на запись

 TSetTextEx = record
   Flags: DWORD;
   Codepage: UINT;
 end;

и указатель на ANSI-строку с RTF-последовательностью.

Константы не описаны, кстати, так что придется вручную накинуть:
 
 EM_SETTEXTEX = WM_USER + 97;
 ST_SELECTION = 2; // для TSetTextEx.Flags


Tack   (2008-10-23 14:25:00) [3]

LoadFromStream можно сделать в произвольное место RTF-текста? А как отобразить текущую позицию курсора в позицию RTF-тегов?


clickmaker   (2008-10-23 14:20:00) [4]

SaveToStream - LoadFromStream ?


Наверх

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