//dx02.cpp
//DirectX First Step
//Made by miya  2000.11.01

#define INITGUID
#include <windows.h>
#include <ddraw.h>


//ウィンドウクラス情報
static char szClass[] = "XmplHr2Class";
static char szCaption[] = "DirectX解説書 -第２章-";

//グローバルインターフェイスポインタ
LPDIRECTDRAW7         lpDD = NULL;          //DirectDrawオブジェクト
LPDIRECTDRAWSURFACE7  lpDDSPrimary = NULL;  //DirectDrawプライマリサーフェス
LPDIRECTDRAWCLIPPER   lpClip = NULL;        //DirectDrawクリッパーオブジェクト

//--------------------関数のプロトタイプ宣言--------------------//
LRESULT CALLBACK WindowProc (HWND hWnd , UINT msg , WPARAM wParam , LPARAM lParam);
static BOOL Init (HINSTANCE hInstance, int nCmdShow);


//--------------------メインウィンドウの構築--------------------//
int PASCAL WinMain(HINSTANCE hInstance,
                   HINSTANCE hPrevInstance,
                   LPSTR     lpCmdLine,
                   int       nCmdShow )
{
  MSG msg;    //Windowsメッセージ構造体

  //アプリケーションを初期化。失敗時に終了
  if (!Init (hInstance,nCmdShow))
    return FALSE;

  //終了までメッセージループを処理
  while (GetMessage (&msg, NULL, NULL, NULL)){
    TranslateMessage (&msg);
    DispatchMessage (&msg);
  }

  //最終メッセージを返して終了
  return (msg.wParam);
}


//--------------------メッセージループの組み立て--------------------//
LRESULT CALLBACK WindowProc (HWND hWnd , UINT msg , WPARAM wParam , LPARAM lParam)
{
  switch (msg){
    case WM_CREATE:
      if (FAILED (DirectDrawCreateEx (NULL,(LPVOID*)&lpDD,IID_IDirectDraw7,NULL ))){
        MessageBox (hWnd , "DirectDrawオブジェクトの生成に失敗" , szCaption , MB_OK);
        PostQuitMessage (0);
        break;
      }
      MessageBox (hWnd , "DirectDrawオブジェクトの生成に成功" , szCaption , MB_OK);
      lpDD->Release ( );
      break;
    case WM_DESTROY:
      if (!lpDD) lpDD->Release ( );
      PostQuitMessage (0);
      break;
    default:
      return DefWindowProc (hWnd , msg , wParam , lParam);
  }
  return 0;
}

//--------------------ウィンドウの作成--------------------//
static BOOL Init (HINSTANCE hInstance, int nCmdShow)
{
  HWND hWnd;
  WNDCLASS wc;

  //ウィンドウクラスをセットアップし、登録
  wc.style          = CS_HREDRAW | CS_VREDRAW;
  wc.lpfnWndProc    = (WNDPROC) WindowProc;
  wc.cbClsExtra     = 0;
  wc.cbWndExtra     = sizeof (DWORD);
  wc.hInstance      = hInstance;
  wc.lpszClassName  = szClass;
  wc.hIcon          = NULL;
  wc.hCursor        = LoadCursor (NULL , IDC_ARROW);
  wc.hbrBackground  = HBRUSH (COLOR_WINDOW + 1);
  wc.lpszMenuName   = NULL;
  if (!RegisterClass (&wc))	return FALSE;

  //ウィンドウを作成して表示
  hWnd = CreateWindow (szClass,              //クラス
                       szCaption,            //キャプション
                       WS_VISIBLE | 
                       WS_OVERLAPPEDWINDOW,  //スタイル
                       CW_USEDEFAULT,        //ウィンドウ原点の横座標
                       CW_USEDEFAULT,        //ウィンドウ原点の縦座標
                       400,                  //ウィンドウの幅
                       300,                  //ウィンドウの高さ
                       NULL,                 //親ウィンドウ
                       NULL,                 //メニュー
                       hInstance,            //インスタンス
                       NULL);                //パラメータ
  if (hWnd == NULL)	return FALSE;

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

  return TRUE;
}