Загвоздка с Subclassing в RichEdit

@Cuellius · Регистрация: 23.06.2015

Студворк — интернет-сервис помощи студентам

Доброго времени суток!
Столкнулся со следующей проблемой - Subclassing в RichEdit.

Класс CColoredRichTextBox:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
class CColoredRichTextBox
{
public:
    CColoredRichTextBox(){}
    CColoredRichTextBox(HWND hWndOwner, int x, int y, int width, int height, int iMenuId);
    
    void SetText(LPTSTR lpText);
    void SetText(std::basic_string<TCHAR> sText);
    std::basic_string<TCHAR> GetText();
    std::string GetTextAnsi();
    
    void SetFont(HFONT hFont);
    void SetReadOnly(BOOL bSet);
 
    void Highlight(UINT uStartPos, UINT uEndPos, COLORREF color);
    void HighlightClear();
 
    void Invalidate();
 
    HWND hEditWnd;
 
    WNDPROC wpOld;
    static LRESULT CALLBACK WndProc(HWND hwnd, UINT uMessage, WPARAM wParam, LPARAM lParam);
};

Пытаюсь осуществить Subclassing:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
#ifdef _WIN64
#define GWL_HINSTANCE GWLP_HINSTANCE
#define GWL_USERDATA GWLP_USERDATA
#define GWL_WNDPROC GWLP_WNDPROC
#endif /* _WIN64 */
 
LRESULT CALLBACK CColoredRichTextBox::WndProc(HWND hwnd, UINT uMessage, WPARAM wParam, LPARAM lParam)
{
    CColoredRichTextBox* lpEdit = (CColoredRichTextBox*)GetWindowLongPtr(hwnd, GWL_USERDATA);
    if(lpEdit)
    {
                //Тут потом напишу обработку сообщений
        return CallWindowProc(lpEdit->wpOld, lpEdit->hEditWnd, uMessage, wParam, lParam);
    }
    return 0;
}
 
CColoredRichTextBox::CColoredRichTextBox(HWND hWndOwner, int x, int y, int width, int height, int iMenuId)
{
    LoadLibrary(TEXT("Msftedit.dll"));
 
    hEditWnd = CreateWindowEx(0, MSFTEDIT_CLASS, TEXT(""), 
        WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_HSCROLL | ES_MULTILINE | ES_AUTOVSCROLL | ES_AUTOHSCROLL | WS_BORDER, 
        x, y, width, height, hWndOwner, (HMENU)iMenuId, GetModuleHandle(NULL), NULL);
 
    ULONG_PTR lExStyle = GetWindowLongPtr(hEditWnd, GWL_EXSTYLE);
    lExStyle &= ~WS_EX_CLIENTEDGE;
    SetWindowLongPtr(hEditWnd, GWL_EXSTYLE, lExStyle);
 
    SetWindowLongPtr(hEditWnd, GWL_USERDATA, (LONG_PTR)this);
    this->wpOld = (WNDPROC)SetWindowLongPtr(hEditWnd, GWL_WNDPROC, (LONG_PTR)(WNDPROC(this->WndProc))); 
}

Размещаю два RichEdit'а в главном окне, в обработке WM_CREATE:

C++
1
2
3
4
5
6
rtb1 = CColoredRichTextBox(hWnd, 280, 30, 330, 560, IDC_RTB_FIRST);
rtb2 = CColoredRichTextBox(hWnd, 620, 30, 330, 560, IDC_RTB_SECOND);
rtb1.SetFont(hFontConsolas);
rtb2.SetFont(hFontConsolas);
rtb1.SetReadOnly(TRUE);
rtb2.SetReadOnly(TRUE);

Компилирую (x64, Release), запускаю - и получаю ошибку(картинка во вложении).

Как это можно исправить?

@castaway · 05.07.2015, 22:13

Сообщение от Cuellius

Как это можно исправить?

Реализуй обработку ошибок, выясни какая из функций не выполняется.

@Cuellius · 05.07.2015, 23:13 **[ТС]**

Сообщение от castaway

Реализуй обработку ошибок, выясни какая из функций не выполняется.

Реализовал.
И увидел что сообщения от второго окна приходят к первому (рисунок во вложении).

Чуть-чуть переделал:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
CColoredRichTextBox::CColoredRichTextBox(HWND hWndOwner, int x, int y, int width, int height, int iMenuId)
{
    LoadLibrary(TEXT("Msftedit.dll"));
 
    hEditWnd = CreateWindowEx(0, MSFTEDIT_CLASS, TEXT(""), 
        WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_HSCROLL | ES_MULTILINE | ES_AUTOVSCROLL | ES_AUTOHSCROLL | WS_BORDER, 
        x, y, width, height, hWndOwner, (HMENU)iMenuId, GetModuleHandle(NULL), NULL);
 
    ULONG_PTR lExStyle = GetWindowLongPtr(hEditWnd, GWL_EXSTYLE);
    lExStyle &= ~WS_EX_CLIENTEDGE;
    SetWindowLongPtr(hEditWnd, GWL_EXSTYLE, lExStyle);
 
    this->SubClass();
}
 
void CColoredRichTextBox::SubClass()
{
    SetWindowLongPtr(this->hEditWnd, GWL_USERDATA, (LONG_PTR)this);
    this->wpOld = (WNDPROC)SetWindowLongPtr(hEditWnd, GWL_WNDPROC, (LONG_PTR)(WNDPROC(this->WndProc))); 
}

Та же ситуация.

Попробовал так:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
CColoredRichTextBox::CColoredRichTextBox(HWND hWndOwner, int x, int y, int width, int height, int iMenuId)
{
    LoadLibrary(TEXT("Msftedit.dll"));
 
    hEditWnd = CreateWindowEx(0, MSFTEDIT_CLASS, TEXT(""), 
        WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_HSCROLL | ES_MULTILINE | ES_AUTOVSCROLL | ES_AUTOHSCROLL | WS_BORDER, 
        x, y, width, height, hWndOwner, (HMENU)iMenuId, GetModuleHandle(NULL), NULL);
 
    ULONG_PTR lExStyle = GetWindowLongPtr(hEditWnd, GWL_EXSTYLE);
    lExStyle &= ~WS_EX_CLIENTEDGE;
    SetWindowLongPtr(hEditWnd, GWL_EXSTYLE, lExStyle);
}
 
void CColoredRichTextBox::SubClass()
{
    SetWindowLongPtr(this->hEditWnd, GWL_USERDATA, (LONG_PTR)this);
    this->wpOld = (WNDPROC)SetWindowLongPtr(hEditWnd, GWL_WNDPROC, (LONG_PTR)(WNDPROC(this->WndProc))); 
}

C++
1
2
3
4
5
6
7
8
rtb1 = CColoredRichTextBox(hWnd, 280, 30, 330, 560, IDC_RTB_FIRST);
rtb2 = CColoredRichTextBox(hWnd, 620, 30, 330, 560, IDC_RTB_SECOND);
rtb1.SubClass();
rtb2.SubClass();
rtb1.SetFont(hFontConsolas);
rtb2.SetFont(hFontConsolas);
rtb1.SetReadOnly(TRUE);
rtb2.SetReadOnly(TRUE);

Заработало!

Но теперь вопрос в другом - почему заработало только так. Я ведь ничего принципиально не изменил?

@castaway · 05.07.2015, 23:17

Сообщение от Cuellius

Реализовал.

Где?

Сообщение от Cuellius

Но теперь вопрос в другом - почему заработало только так. Я ведь ничего принципиально не изменил?

Так - это как? Обработки ошибок я не вижу.

Новые блоги и статьи Все статьи Все блоги /
Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем	10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .
Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .	Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .