第１７１章もう少し改善する

今回は、特に新しいことは出てきません。前章のプログラムは、WM_PAINT メッセージの処理以外のところで、SetDIBitsToDevice関数を使ったため、WM_PAINTメッセージが来ると表示が消えてしまいました。今回は、その点を改善します。また、ビットマップの大きさに合わせてウィンドウサイズを変更するようにします。

リソース・スクリプトは前回と同じなので省略します。


//        bmpfile2x.cpp

#ifndef STRICT
    #define STRICT
#endif
#include <windows.h>
#include "resource.h"

LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);
ATOM InitApp(HINSTANCE);
BOOL InitInstance(HINSTANCE, int);
int ReadDIB(HWND);

char szClassName[] = "bmpfile2x";        //ウィンドウクラス
char szFileName[128]; //オープンするビットマップファイル
HANDLE hMem, hMemInfo;
LONG wx, wy;
char *szBuffer;
DWORD dwFileSize, dwOffBits, dwSizeImage, dwResult;
LPBITMAPINFO lpbmp_info;
BOOL bLoad = FALSE;

今後の展開上wx, wy（ビットマップの幅、高さ）などいくつかの変数をグローバル変数にしました。


int WINAPI WinMain(HINSTANCE hCurInst, HINSTANCE hPrevInst,
                   LPSTR lpsCmdLine, int nCmdShow)
{
    MSG msg;
    
    if (!InitApp(hCurInst))
        return FALSE;
    if (!InitInstance(hCurInst, nCmdShow)) 
        return FALSE;
    while (GetMessage(&msg, NULL, 0, 0)) {
        TranslateMessage(&msg);
        DispatchMessage(&msg);
    }
    return msg.wParam;
}

//ウィンドウ・クラスの登録

ATOM InitApp(HINSTANCE hInst)
{
    WNDCLASSEX wc;
    wc.cbSize = sizeof(WNDCLASSEX);
    wc.style = CS_HREDRAW | CS_VREDRAW;
    wc.lpfnWndProc = WndProc;    //プロシージャ名
    wc.cbClsExtra = 0;
    wc.cbWndExtra = 0;
    wc.hInstance = hInst;        //インスタンス
    wc.hIcon = LoadIcon(NULL, IDI_APPLICATION);
    wc.hCursor = LoadCursor(NULL, IDC_ARROW);
    wc.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH);
    wc.lpszMenuName = "MYMENU";    //メニュー名
    wc.lpszClassName = (LPCSTR)szClassName;
    wc.hIconSm = LoadIcon(NULL, IDI_APPLICATION);
    return (RegisterClassEx(&wc));
}

//ウィンドウの生成

BOOL InitInstance(HINSTANCE hInst, int nCmdShow)
{
    HWND hWnd;

    hWnd = CreateWindow(szClassName,
            "とりあえず動くプログラム２",//タイトルバーにこの名前が表示されます
            WS_OVERLAPPEDWINDOW,//ウィンドウの種類
            CW_USEDEFAULT,    //Ｘ座標
            CW_USEDEFAULT,    //Ｙ座標
            CW_USEDEFAULT,    //幅
            CW_USEDEFAULT,    //高さ
            NULL,    //親ウィンドウのハンドル、親を作るときはNULL
            NULL,    //メニューハンドル、クラスメニューを使うときはNULL
            hInst,    //インスタンスハンドル
            NULL);
    if (!hWnd)
        return FALSE;
    ShowWindow(hWnd, nCmdShow);
    UpdateWindow(hWnd);
    return TRUE;
}

このへんは、いつもと同じです。


//ウィンドウプロシージャ

LRESULT CALLBACK WndProc(HWND hWnd, UINT msg, WPARAM wp, LPARAM lp)
{
    int id;
    OPENFILENAME ofn;
    HDC hdc;
    PAINTSTRUCT ps;

    switch (msg) {
        case WM_PAINT:
            if (bLoad) {
                hdc = BeginPaint(hWnd, &ps);
                SetDIBitsToDevice(hdc,
                    0, 0, //転送先座標
                    wx, wy, //幅、高さ
                    0, 0, //転送元座標
                    0, wy, //走査開始番号、走査線の本数
                    //ビットマップデータ開始のアドレス
                    (char *)szBuffer + dwOffBits - sizeof(BITMAPFILEHEADER),
                    lpbmp_info, //BITMAPINFO構造体へのポインタ
                    DIB_RGB_COLORS);
                EndPaint(hWnd, &ps);
            } else {
                return (DefWindowProc(hWnd, msg, wp, lp));
            }
            break;
        case WM_COMMAND:
            switch (LOWORD(wp)) {
                case IDM_END:
                    SendMessage(hWnd, WM_CLOSE, 0, 0);
                    break;
                case IDM_OPEN:
                    memset(&ofn, 0, sizeof(OPENFILENAME));
                    ofn.lStructSize = sizeof(OPENFILENAME);
                    ofn.hwndOwner = hWnd;
                    ofn.lpstrFilter = "Bitmap (*.BMP)\0*.BMP\0\0";
                    ofn.nFilterIndex = 1;
                    ofn.lpstrFile = szFileName;
                    ofn.nMaxFile = 128;
                    ofn.Flags = OFN_HIDEREADONLY;

                    if (GetOpenFileName((LPOPENFILENAME)&ofn))
                        ReadDIB(hWnd);
                    break;
            }
            break;
        case WM_CLOSE:
            id = MessageBox(hWnd,
                "終了してもよいですか",
                "終了確認",
                MB_YESNO | MB_ICONQUESTION);
            if (id == IDYES) {
                if (hMem)
                    if (GlobalFree(hMem))
                        MessageBox(hWnd, "GlobalFreeに失敗", "Error", MB_OK);
                if (hMemInfo)
                    GlobalFree(hMemInfo);
                DestroyWindow(hWnd);
            }
            break;
        case WM_DESTROY:
            PostQuitMessage(0);
            break;
        default:
            return (DefWindowProc(hWnd, msg, wp, lp));
    }
    return 0;
}

WM_PAINTメッセージを処理するようにしました。

また、プログラム終了時にhMem, hMemInfoをGlobalFreeするようにしています。


int ReadDIB(HWND hWnd)
{
    HANDLE hF, hMem1, hMem2;
    LPBITMAPFILEHEADER lpBf;
    static LPBITMAPINFOHEADER lpBi;
    WORD wBitCount;
    DWORD dwClrUsed;
    char szFType[3];
    RECT rc;
    int x, y;

    bLoad = TRUE;
    hF = CreateFile(szFileName, GENERIC_READ, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL,
        NULL);
    if (hF == INVALID_HANDLE_VALUE) {
        MessageBox(hWnd, "ファイルのオープンに失敗しました", "Error", MB_OK);
        return -1;
    }
    hMem1 = GlobalAlloc(GHND, sizeof(BITMAPFILEHEADER));
    lpBf = (LPBITMAPFILEHEADER)GlobalLock(hMem1);
    ReadFile(hF, (LPBITMAPFILEHEADER)lpBf, sizeof(BITMAPFILEHEADER), &dwResult, NULL);
    
    dwFileSize = lpBf->bfSize;
    szFType[0] = LOBYTE(lpBf->bfType);
    szFType[1] = HIBYTE(lpBf->bfType);
    szFType[2] = '\0';
    dwOffBits = lpBf->bfOffBits;

    hMem2 = GlobalAlloc(GHND, sizeof(BITMAPINFOHEADER));
    lpBi = (LPBITMAPINFOHEADER)GlobalLock(hMem2);
    ReadFile(hF, (LPBITMAPINFOHEADER)lpBi, sizeof(BITMAPINFOHEADER), &dwResult, NULL);

    wx = lpBi->biWidth;
    wy = lpBi->biHeight;
    wBitCount = lpBi->biBitCount;
    dwClrUsed = lpBi->biClrUsed;
    dwSizeImage = lpBf->bfSize - lpBf->bfOffBits;

    if (dwClrUsed != 0 || wBitCount != 24 || strcmp(szFType, "BM") != 0) {
        MessageBox(hWnd, "このファイルは読めません", "Error", MB_OK);
        GlobalFree(hMem1);
        GlobalFree(hMem2);
        CloseHandle(hF);
        return -1;
    }

    hMemInfo = GlobalAlloc(GHND, sizeof(BITMAPINFO));
    lpbmp_info = (LPBITMAPINFO)GlobalLock(hMemInfo);

    lpbmp_info->bmiHeader = *lpBi;
    if (hMem) {
        if(GlobalFree(hMem))
            MessageBox(hWnd, "GlobalFree失敗", "Error", MB_OK);
    }
    
    hMem = GlobalAlloc(GHND, dwFileSize - sizeof(BITMAPFILEHEADER));
    szBuffer = (char *)GlobalLock(hMem);
    
    SetFilePointer(hF, sizeof(BITMAPFILEHEADER), 0, FILE_BEGIN);
    ReadFile(hF, szBuffer, sizeof(BITMAPINFOHEADER) + dwSizeImage, &dwResult, NULL);

    GetWindowRect(hWnd, &rc);
    x = rc.left;
    y = rc.top;
    rc.right = x + wx;
    rc.bottom = y + wy;
    AdjustWindowRect(&rc, WS_OVERLAPPEDWINDOW, TRUE);
    MoveWindow(hWnd, x, y, rc.right - rc.left, rc.bottom - rc.top, TRUE);
    InvalidateRect(hWnd, NULL, TRUE);

    GlobalUnlock(hMemInfo);
    GlobalUnlock(hMem);
    GlobalUnlock(hMem1);
    if (GlobalFree(hMem1))
        MessageBox(hWnd, "GlobalFree(hMem1)失敗", "Error", MB_OK);
    GlobalUnlock(hMem2);
    if (GlobalFree(hMem2))
        MessageBox(hWnd, "GlobalFree(hMem2)失敗", "Error", MB_OK);
    CloseHandle(hF);
    return 0;
}

これで、前回より少しましになりました。しかし、まだまだ不満の多いプログラムです。

[SDK第２部 Index] [総合Index] [Previous Chapter] [Next Chapter]

Update 20/Jan/1999 By Y.Kumei
当ホーム・ページの一部または全部を無断で複写、複製、転載あるいはコンピュータ等のファイルに保存することを禁じます。

第１７１章 もう少し改善する

第１７１章もう少し改善する