Сообщение RichEdit EM_AUTOURLDETECT распознает ссылку, но я не могу щелкнуть по ней

Question

У меня есть элемент управления RichEdit в диалоговом окне. Элемент управления RichEdit отображает текст RTF . EM_AUTOURLDETECT заставляет элемент управления RichEdit правильно форматировать и распознавать гиперссылку. Когда указатель мыши находится над ссылкой, указатель меняется на руку, но браузер не запускается после нажатия на ссылку.

Мне не хватает какого-то кода обработчика событий?

case WM_INITDIALOG:
{
    // Create Richedit
    HWND hwndRE = CreateWindowA("RichEdit20A", "", WS_CHILD | WS_BORDER | WS_VSCROLL | ES_READONLY | ES_MULTILINE, 10, 10, 480, 220, hDlgWnd, 0, hInst, 0);

    SendMessage(hwndRE ,EM_AUTOURLDETECT,(WPARAM)TRUE,(LPARAM)0);
    //SendMessage(hwndRE ,EM_SETEVENTMASK, 1, ENM_LINK | ENM_CHANGE);

    ShowWindow(hwndRE, SW_SHOWNORMAL);
    SETTEXTEX SetTextEx;
    char* aboutdata = "{\\rtf1\\ansi\\ansicpg1252\\deff0\\deflang1033{\\fonttbl{\\f0\\fnil\\fcharset0 Verdana;}}\\viewkind4\\uc1\\pard\\qc\\b\\f0\\fs20 www.whateverdomain.com} ");
    SendMessage(hwndRE, EM_SETTEXTEX,(WPARAM)&SetTextEx, (LPARAM)(LPCTSTR)aboutdata);
    return TRUE;
}

Answer 1

Вы можете попробовать что-то вроде этого:

case WM_NOTIFY:
    switch (((LPNMHDR)lParam)->code)
    {
        case EN_LINK:
            ENLINK * enLinkInfo = (ENLINK *)lParam;

            if (enLinkInfo->msg == WM_LBUTTONUP)
            {
                // code which gets clicked URL using enLinkInfo->chrg and saves it in
                // "urlString"

                ShellExecute(NULL, "open", urlString, NULL, NULL, SW_SHOWNORMAL);
            }
            break;

        .... // More cases on WM_NOTIFY switch.
    }
    break;

Как правило, когда код WM_NOTIFY равен EN_LINK, вы получаете нажатый URL-адрес и запускаете его с помощью ShellExecute.

Answer 2

Посмотрите на EN_LINK:

http://msdn.microsoft.com/en-us/library/bb787970(VS.85).aspx