Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Paste в RithTextBox / 5 сообщений из 5, страница 1 из 1
19.05.2004, 14:10
    #32523966
Paste в RithTextBox
Господа! Может, кто нашёл решение?
Требуется вставить в RithTextBox форматированный текст (с рисунками) из буфера обмена. Использование _CLIPTEXT не помогает, т.е. команда

thisform.oleRTF.TextRTF = _CLIPTEXT

вставляет неформатированный текст. В тоже время при выборе опции меню RithTextBox Paste всё ОК!
Как это сделать программно?

Заранее спасибо.
...
Рейтинг: 0 / 0
19.05.2004, 15:09
    #32524139
piva
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Paste в RithTextBox
SendMessage(thisform.oleRTF.hwnd,WM_PASTE,0,0)
...
Рейтинг: 0 / 0
19.05.2004, 15:25
    #32524190
Paste в RithTextBox
Спасибо, попробую. Где-то я уже видел это...
...
Рейтинг: 0 / 0
19.05.2004, 16:21
    #32524370
Paste в RithTextBox
Для тех, кому интересно.
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
#DEFINE WM_PASTE 0x0302 && Вставка из буфера обмена
#DEFINE WM_CUT 0x0302   && Вырезать в буфер
#DEFINE WM_COPY 0x0302  && Копировать в буфер
#DEFINE WM_UNDO 0x0302  && Отмена изменений

Declare Long SendMessage In user32 Long hwnd, long wmsg, long wparam, string lparam
SendMessage(thisform.oleRTF.hwnd,WM_PASTE, 0 , 0 ) && Вставка
CLEAR DLLS SendMessage
Подставляя в вызов SendMessage значения, перечисленные в #DEFINE, выполняем для RithTextBox указанные действия.

to Piva:
Спасибо за вправку мозгов.
...
Рейтинг: 0 / 0
19.05.2004, 17:22
    #32524549
Paste в RithTextBox
Извините, поторопился...

#DEFINE WM_PASTE 0x0302
#DEFINE WM_CUT 0x0300
#DEFINE WM_COPY 0x0301
#DEFINE WM_UNDO 0x0304
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Paste в RithTextBox / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]