リッチエディットでメモ帳を作る３

#include <windows.h>
#include <richedit.h>   // CHARFORMAT構造体を使うためにインクルード
#include "resource.h"

// グローバル変数:
HINSTANCE hInst;                          // 現在のインターフェイス
// リッチエディットの使用するために用いる変数宣言
TCHAR strPath[MAX_PATH + 1];    // DLLのパス
HINSTANCE hRtLib;               // インスタンスハンドル
HWND hRichEdit;                 // ウィンドウハンドル
DWORD dwChMask;                 // CHARFORMAT構造体で使うマスク値

// このコード モジュールに含まれる関数の宣言を転送します:
ATOM MyRegisterClass(HINSTANCE hInstance);
BOOL InitInstance(HINSTANCE, int);
LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);
void SetFont();

int APIENTRY WinMain(HINSTANCE hInstance,
                     HINSTANCE hPrevInstance,
                     LPSTR lpCmdLine,
                     int nCmdShow)
{
    MSG msg;
    MyRegisterClass(hInstance);

    // アプリケーションの初期化を実行します:
    if (!InitInstance (hInstance, nCmdShow))
    {
        return FALSE;
    }
    // メイン メッセージ ループ:
    while (GetMessage(&msg, NULL, 0, 0))
    {
        TranslateMessage(&msg);
        DispatchMessage(&msg);
    }
    return (int) msg.wParam;
}

//
//  関数: MyRegisterClass()
//
//  目的: ウィンドウ クラスを登録します。
//
ATOM MyRegisterClass(HINSTANCE hInstance)
{
    WNDCLASSEX wcex;

    wcex.cbSize = sizeof(WNDCLASSEX);

    wcex.style = CS_HREDRAW | CS_VREDRAW;
    wcex.lpfnWndProc = WndProc;
    wcex.cbClsExtra = 0;
    wcex.cbWndExtra = 0;
    wcex.hInstance = hInstance;
    wcex.hIcon = LoadIcon(NULL , IDI_APPLICATION);
    wcex.hCursor = LoadCursor(NULL, IDC_ARROW);
    wcex.hbrBackground = (HBRUSH)(COLOR_WINDOW+1);
    wcex.lpszMenuName = MAKEINTRESOURCE(IDC_HP);
    wcex.lpszClassName = TEXT("HP");
    wcex.hIconSm = LoadIcon(NULL , IDI_APPLICATION);

    return RegisterClassEx(&wcex);
}

//
//   関数: InitInstance(HINSTANCE, int)
//
//   目的: メイン ウィンドウを作成します。
//
BOOL InitInstance(HINSTANCE hInstance, int nCmdShow)
{
   HWND hWnd;

   hInst = hInstance; // グローバル変数にインスタンス処理を格納します。

   hWnd = CreateWindow(TEXT("HP"), TEXT("HP"), WS_OVERLAPPEDWINDOW,
      CW_USEDEFAULT, 0, CW_USEDEFAULT, 0, NULL, NULL, hInstance, NULL);

   if (!hWnd)
   {
      return FALSE;
   }

   ShowWindow(hWnd, nCmdShow);
   UpdateWindow(hWnd);

   return TRUE;
}

//
//  関数: WndProc(HWND, UINT, WPARAM, LPARAM)
//
//  目的:  メイン ウィンドウのメッセージを処理します。
//
//  WM_CREATE  - ウインドウ作成時の処理
//  WM_SIZE    - ウインドウサイズ変更時の処理
//  WM_COMMAND - アプリケーション メニューの処理
//  WM_DESTROY - 中止メッセージを表示して戻る
//
//
LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
    int wmId, wmEvent;
    DWORD dwLangOptions;
    CHARFORMAT  cfm;    // CHARFORMAT構造体

    switch (message)
    {
        case WM_CREATE:
            // DLLのロード
            GetSystemDirectory(strPath , MAX_PATH + 1);
            wsprintf(strPath, TEXT("%s\\%s"), strPath, TEXT("RICHED20.DLL"));
            hRtLib = LoadLibrary((LPCTSTR)strPath);

            hRichEdit = CreateWindowEx(WS_EX_CLIENTEDGE,
                TEXT("RichEdit20A"), TEXT(""),
                WS_CHILD | WS_VISIBLE | WS_BORDER | ES_MULTILINE | WS_HSCROLL
                | WS_VSCROLL | ES_AUTOVSCROLL | ES_NOHIDESEL,
                0, 0, 0, 0,
                hWnd, (HMENU)IDC_RICHEDIT, hInst, NULL);

            // デュアルフォントモードを無効にする
            // 下記３行がないと、半角文字のフォントが変更できない
            dwLangOptions = SendMessage(hRichEdit, EM_GETLANGOPTIONS, 0, 0); 
            dwLangOptions &= ~IMF_DUALFONT;
            SendMessage(hRichEdit, EM_SETLANGOPTIONS, 0, (LPARAM)dwLangOptions);

            memset(&cfm, 0, sizeof(CHARFORMAT));
            cfm.cbSize = sizeof(CHARFORMAT);  // CHARFORMAT構造体のサイズを渡す
            cfm.dwMask = CFM_BOLD | CFM_ITALIC | CFM_UNDERLINE | CFM_STRIKEOUT
                         | CFM_CHARSET | CFM_FACE | CFM_COLOR  | CFM_SIZE;
            dwChMask = cfm.dwMask;
            cfm.yHeight = 20 * 12;
            cfm.crTextColor = 0x000000;
            cfm.bCharSet = SHIFTJIS_CHARSET;  //文字コード（ShiftJIS）
            lstrcpy(cfm.szFaceName, TEXT("ＭＳ ゴシック"));
            SendMessage(hRichEdit, EM_SETCHARFORMAT,
                         SCF_SELECTION | SCF_WORD, (LPARAM)&cfm);
            break;
        case WM_SIZE:
            MoveWindow(hRichEdit, 0, 0, LOWORD(lParam), HIWORD(lParam), TRUE);
            break;
        case WM_COMMAND:
            wmId = LOWORD(wParam);
            wmEvent = HIWORD(wParam);
            // 選択されたメニューの解析:
            switch (wmId)
            {
                case IDM_FONT:
                    SetFont();
                    break;
                case IDM_EXIT:
                    DestroyWindow(hWnd);
                    break;
                default:
                    return DefWindowProc(hWnd, message, wParam, lParam);
            }
            break;
        case WM_DESTROY:
            PostQuitMessage(0);
            break;
        default:
            return DefWindowProc(hWnd, message, wParam, lParam);
    }
    return 0;
}


// フォント選択ダイアログ
void SetFont()
{
    CHARFORMAT cfm;
    CHOOSEFONT cf;
    LOGFONT lf;
    HDC hDC;

    memset(&cf, 0, sizeof(CHOOSEFONT));
    memset(&lf, 0, sizeof(LOGFONT));
    cfm.cbSize = sizeof(CHARFORMAT);

    //今までの設定を取得してそれをCHOOSEFONT構造体に渡す
    SendMessage(hRichEdit, EM_GETCHARFORMAT, TRUE, (LPARAM)&cfm);
    hDC = GetDC(hRichEdit);
    lf.lfHeight = cfm.yHeight *
        GetDeviceCaps(hDC, LOGPIXELSY) / (-72 * 20);
    ReleaseDC(hRichEdit, hDC);
    cfm.dwMask = dwChMask;
    if (cfm.dwEffects & CFE_BOLD)
    {
        lf.lfWeight = FW_BOLD;
    }
    else
    {
        lf.lfWeight = FW_NORMAL;
    }
    if (cfm.dwEffects & CFE_ITALIC)
    {
        lf.lfItalic = 1;
    }
    if (cfm.dwEffects & CFE_UNDERLINE)
    {
        lf.lfUnderline = 1;
    }
    if (cfm.dwEffects & CFE_STRIKEOUT)
    {
        lf.lfStrikeOut = 1;
    }
    lf.lfCharSet = cfm.bCharSet;
    lstrcpy(lf.lfFaceName, cfm.szFaceName);
    cf.rgbColors = cfm.crTextColor;
    cf.lStructSize = sizeof(CHOOSEFONT);
    cf.hwndOwner = hRichEdit;
    cf.lpLogFont = &lf;
    cf.Flags = CF_SCREENFONTS | CF_EFFECTS | CF_INITTOLOGFONTSTRUCT;
    
    // フォント選択ダイアログを出す
    if(ChooseFont(&cf))
    {
        // フォント選択ダイアログから新しい設定を取得する
        cfm.cbSize = sizeof(CHARFORMAT);
        cfm.dwMask = dwChMask;
        cfm.yHeight = 2 * cf.iPointSize;
        cfm.dwEffects = 0;
        if (lf.lfWeight >= FW_BOLD)
        {
            cfm.dwEffects |= CFE_BOLD;
        }
        if (lf.lfItalic)
        {
            cfm.dwEffects |= CFE_ITALIC;
        }
        if (lf.lfUnderline)
        {
            cfm.dwEffects |= CFE_UNDERLINE;
        }
        if (lf.lfStrikeOut)
        {
            cfm.dwEffects |= CFE_STRIKEOUT;
        }
        cfm.crTextColor = (COLORREF)cf.rgbColors;
        cfm.bCharSet = lf.lfCharSet;
        lstrcpy(cfm.szFaceName, lf.lfFaceName);
        SendMessage(hRichEdit, EM_SETCHARFORMAT, 
            SCF_SELECTION, (LPARAM)&cfm);
    }
    SetFocus(hRichEdit);
}

#define IDM_ABOUT 104
#define IDM_EXIT 105
#define IDM_FONT 170
#define IDC_HP 109
#define IDC_RICHEDIT 101

#include "resource.h"

/////////////////////////////////////////////////////////////////////////////
//
// メニュー
//

IDC_HP MENU
BEGIN
    POPUP "ファイル(&F)"
    BEGIN
        MENUITEM "アプリケーションの終了(&X)", IDM_EXIT
    END
    POPUP "書式(&O)"
    BEGIN
        MENUITEM "フォント(&F)...", IDM_FONT
    END
    POPUP "ヘルプ(&H)"
    BEGIN
        MENUITEM "バージョン情報(&A)...", IDM_ABOUT
    END
END