TRichEdit! Help!

← →
eLVik © (2003-03-19 18:46) [0]

Добрый вечер! И это снова я :)
Помогите найти выход из следующей ситуации...
Содержимое документа Word (весом в 314 кб без картинок) полностью копирую в буфер обмена, а затем вставляю всю эту громадину в RichEdit в моей программе. Однако в RichEdit"е отображается приблизительно половина от скопированной части.
Видать памяти ему не хватает. Как заставить RichEdit вмещать в себя всё содержимое буфера обмена, т.к. 314 кб вовсе не предел.

Пробовал воспользоваться компонентами, вроде WordApplication, но я с ними никогда ранее не работал, а в хелпе про них нет ничего.

Подскажите, пожалуйста... Горю!!!
Спасибо за внимание!

← →
Clickmaker © (2003-03-19 18:51) [1]

Как вставляешь? Ctrl+V, WM_PASTE, GetClipboardData... ?

← →
eLVik © (2003-03-19 18:53) [2]

Ручками
1) открываю Word
2) Копирую всё
3) Перехожу в мою прогу
4) Ctrl+V на RichEdit"е

← →
Clickmaker © (2003-03-19 19:08) [3]

Попробуй послать ему EM_EXLIMITTEXT с нужным количеством символов

← →
eLVik © (2003-03-19 19:20) [4]

RichEdit1.Perform(EM_EXLIMITTEXT, n, 0)
Как узнать n? Что это такое - количество символов или размер в килобайтах? И как это получить из ClipBoard"a?

Thanks

← →
Clickmaker © (2003-03-19 19:27) [5]

В символах или в байтах. OLE объект считается за 1 символ. А вообще, рекомендую поюзать RxRichEdit из RxLib. Он поддерживает виндозный riched20.dll версии старше 2, вставку картинок, OLE-объектов, распознает гиперссылки

Спасибо

Что-то не работает пишу так

procedure TfmMain.mnuPasteClick(Sender: TObject); var n: Integer; begin n := Length(ClipBoard.AsText); RichEdit1.Perform(EM_EXLIMITTEXT, n, 0); // ругается на EM_EXLIMITTEXT - Undeclared Indentifier RichEdit1.PasteFromClipboard; end;

Что за модуль надо подключить?

const
EM_EXLIMITTEXT = WM_USER + 53;

Объявлен в модуле RichEdit.pas

TRichEdit! Help! Найти похожие ветки