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

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-объектов, распознает гиперссылки


← →
eLVik ©   (2003-03-19 19:35) [6]

Спасибо


← →
eLVik ©   (2003-03-19 19:43) [7]

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

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;


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


← →
Goblinus ©   (2003-03-20 01:18) [8]

const
EM_EXLIMITTEXT = WM_USER + 53;

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



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

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



Память: 0.46 MB
Время: 0.01 c
14-100370
LazorenkoX
2003-03-13 10:45
2003.03.31
MySQL


3-100180
Explorer
2003-03-13 08:32
2003.03.31
Locate


3-100193
Exception
2003-03-12 04:48
2003.03.31
Ребят, научите, пожалуйста, как упаковать dBase *.dbf


1-100248
canec
2003-03-18 15:17
2003.03.31
wMilliseconds


14-100433
NetKnight
2003-03-14 11:54
2003.03.31
КИНТЕ ДОКУМЕНТАЦИЮ ПО РАБОТЕ С SysTray.




   Наверх