// atlctrls.h内
typedef CRichEditCtrlT<ATL::CWindow>   CRichEditCtrl;
			

// stdafx.h内
// リッチエディットコントロールのバージョン1.0を使用することを定義
#define _RICHEDIT_VER  0x0100

#include <atlbase.h>
#include <atlapp.h>
extern CAppModule _Module;
#include <atlwin.h>

#include <atlcrack.h>
#include <atlmisc.h>
#include <atlctrls.h>  // コントロール用クラスを使用するため
			

// maindlg.h内
class CMainDlg : public CDialogImpl<CMainDlg>
{
public:
    enum { IDD = IDD_MAINDLG };

    CRichEditCtrl m_rich_emphasis;  // リッチエディット

    // メッセージマップ
    BEGIN_MSG_MAP_EX(CMainDlg)
        MSG_WM_INITDIALOG(OnInitDialog)
        MSG_WM_CONTEXTMENU(OnContextMenu)
        COMMAND_ID_HANDLER_EX(ID_MENUITEM_DEFAULT, OnMenuDefault)
        COMMAND_ID_HANDLER_EX(ID_MENUITEM_EMPHASIS, OnMenuEmphasis)
        COMMAND_ID_HANDLER_EX(IDOK, OnOK)
        COMMAND_ID_HANDLER_EX(IDCANCEL, OnCancel)
    END_MSG_MAP()

    LRESULT OnInitDialog(HWND hWnd, LPARAM lParam){
        // スクリーンの中央に配置
        CenterWindow();

        // 大きいアイコン設定
        HICON hIcon = AtlLoadIconImage(IDR_MAINFRAME, LR_DEFAULTCOLOR,
            ::GetSystemMetrics(SM_CXICON), ::GetSystemMetrics(SM_CYICON));
        SetIcon(hIcon, TRUE);
        
        // 小さいアイコン設定
        HICON hIconSmall = AtlLoadIconImage(IDR_MAINFRAME, LR_DEFAULTCOLOR,
            ::GetSystemMetrics(SM_CXSMICON), ::GetSystemMetrics(SM_CYSMICON));
        SetIcon(hIconSmall, FALSE);

        // コントロール設定
        m_rich_emphasis = GetDlgItem(IDC_RICHEDIT_EMPHASIS);

        return TRUE;
    }

    void OnContextMenu(HWND hWnd, CPoint pt){
        // [Shift]+[F10]キーが押された場合は座標を選択文字列の最後に設定
        if(pt.x == -1 && pt.y == -1){
            LONG start, end;
            m_rich_emphasis.GetSel(start, end);
            pt = m_rich_emphasis.PosFromChar(end);
            m_rich_emphasis.ClientToScreen(&pt);
        }

        // 座標がリッチエディットコントロール内の場合のみポップアップメニューを表示
        CRect rc;
        m_rich_emphasis.GetClientRect(&rc);
        m_rich_emphasis.ClientToScreen(&rc);
        if(rc.PtInRect(pt)){
            CMenu menuPopup;
            menuPopup.LoadMenu(IDR_MENU_POPUP);
            menuPopup.GetSubMenu(0).TrackPopupMenu(
                TPM_LEFTALIGN | TPM_TOPALIGN | TPM_LEFTBUTTON, pt.x, pt.y, m_hWnd);
        }else{
            SetMsgHandled(false);
        }
    }

    void OnMenuDefault(UINT uNotifyCode, int nID, HWND hWndCtl){
        CString strText;
        if(m_rich_emphasis.GetSelText(strText) != 0){
            CHARFORMAT cf = {sizeof(CHARFORMAT)};
            m_rich_emphasis.GetDefaultCharFormat(cf);
            m_rich_emphasis.SetSelectionCharFormat(cf);
        }
    }

    void OnMenuEmphasis(UINT uNotifyCode, int nID, HWND hWndCtl){
        CString strText;
        if(m_rich_emphasis.GetSelText(strText) != 0){
            CHARFORMAT cf = {sizeof(CHARFORMAT)};
            cf.dwMask = CFM_COLOR | CFM_BOLD;
            cf.dwEffects = CFE_BOLD;
            cf.crTextColor = RGB(255, 0, 0);
            m_rich_emphasis.SetSelectionCharFormat(cf);
        }
    }

    void OnOK(UINT uNotifyCode, int nID, HWND hWndCtl){
        EndDialog(nID);
    }

    void OnCancel(UINT uNotifyCode, int nID, HWND hWndCtl){
        EndDialog(nID);
    }
};
			

// Control.cpp内
#include "stdafx.h"

#include "resource.h"

#include "maindlg.h"

CAppModule _Module;

int WINAPI _tWinMain(HINSTANCE hInstance, HINSTANCE, LPTSTR lpCmdLine, int nCmdShow)
{
    // リッチエディットコントロール初期化
    HINSTANCE hRich = LoadLibrary(CRichEditCtrl::GetLibraryName());
    if(hRich == NULL){
        AtlMessageBox(NULL, _T("リッチエディットコントロール初期化失敗"),
            _T("エラー"), MB_OK | MB_ICONERROR);
        return 0;
    }

    HRESULT hRes = ::CoInitialize(NULL);
    ATLASSERT(SUCCEEDED(hRes));

    ::DefWindowProc(NULL, 0, 0, 0L);

    AtlInitCommonControls(ICC_COOL_CLASSES | ICC_WIN95_CLASSES);

    hRes = _Module.Init(NULL, hInstance);
    ATLASSERT(SUCCEEDED(hRes));

    int nRet = 0;
    // BLOCK: アプリケーション実行
    {
        CMainDlg dlgMain;
        nRet = dlgMain.DoModal();
    }

    _Module.Term();
    ::CoUninitialize();

    FreeLibrary(hRich);

    return nRet;
}