Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2009.11.15;
Скачать: [xml.tar.bz2];

Вниз

Передать 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 вся ветка

Форум: "Основная";
Текущий архив: 2009.11.15;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.005 c
2-1254313228
yantux
2009-09-30 16:20
2009.11.15
Подскажите свободные библиотеки для OpenGL


15-1253305803
Юрий
2009-09-19 00:30
2009.11.15
С днем рождения ! 19 сентября 2009 суббота


2-1254386902
NGPOL
2009-10-01 12:48
2009.11.15
DCOM-сервер и "протокол не поддерживается"


15-1253039747
GanibalLector
2009-09-15 22:35
2009.11.15
Самопроизвольная остановка службы "Телефония"


15-1252920399
XXL
2009-09-14 13:26
2009.11.15
Моему холодильнику сегодня 40 лет





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский