Вниз
Скачать: CL | DM;

Передать RTF-текст из одного RichEdit в другой без Clipboard-а   Найти похожие ветки 

 
Tack   (2008-10-23 14:04) [0]

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

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

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


 
clickmaker ©   (2008-10-23 14:20) [1]

SaveToStream - LoadFromStream ?


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

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


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

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

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

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

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

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


 
Leonid Troyanovsky ©   (2008-10-23 17:56) [4]


> 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.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.018 c
2-1254110236
Damon
2009-09-28 07:57
2009.11.15
Список методов в published


2-1254209623
yantux
2009-09-29 11:33
2009.11.15
Повтороный выбор файла компонентом TOpenDialog


3-1229339778
matt
2008-12-15 14:16
2009.11.15
Дерево, набор данных и оптимизация


15-1253223003
Юрий
2009-09-18 01:30
2009.11.15
С днем рождения ! 18 сентября 2009 пятница


1-1225170396
Lennyt
2008-10-28 08:06
2009.11.15
Delphi Учётные записи Ms Outlook




   Наверх