// stdafx.h
#pragma once

#define WINVER _WIN32_WCE
#define _SECURE_ATL 1

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

#include <aygshell.h>
#pragma comment(lib, "aygshell.lib")

#include <atlcrack.h>
#include <atlmisc.h>
			

// MainWindow.h
#pragma once

class CMainWindow : public CWindowImpl<CMainWindow>,
    public CMessageFilter, public CIdleHandler
{
public:
    DECLARE_WND_CLASS(_T("SampleProject"));

    CMenu menu;

    virtual BOOL PreTranslateMessage(MSG* pMsg){
        return FALSE;
    }

    virtual BOOL OnIdle(){
        return FALSE;
    }

    BEGIN_MSG_MAP(CMainWindow)
        MSG_WM_PAINT(OnPaint)
        MSG_WM_LBUTTONDOWN(OnLButtonDown)
        MSG_WM_CREATE(OnCreate)
        MSG_WM_DESTROY(OnDestroy)
        COMMAND_ID_HANDLER_EX(ID_RMENU_ATL, OnRMenuAtl)
        COMMAND_ID_HANDLER_EX(ID_RMENU_WTL, OnRMenuWtl)
        COMMAND_ID_HANDLER_EX(ID_LMENU_CLOSE, OnLMenuClose)
    END_MSG_MAP()

    void OnPaint(CDCHandle /*dc*/){
        CPaintDC dc(m_hWnd);
        CRect rect;
        GetClientRect(rect);
        dc.DrawText(_T("Hello, ATL/WTL"), -1,
            rect, DT_SINGLELINE | DT_CENTER | DT_VCENTER);
    }

    void OnLButtonDown(UINT nFlags, CPoint point){
        SHRGINFO info;
        info.cbSize = sizeof(SHRGINFO);
        info.hwndClient = m_hWnd;
        info.ptDown.x = point.x;
        info.ptDown.y = point.y;
        info.dwFlags = SHRG_RETURNCMD;

        if(SHRecognizeGesture(&info) == GN_CONTEXTMENU){
            menu.GetSubMenu(1).TrackPopupMenu(
                TPM_LEFTALIGN | TPM_TOPALIGN,
                point.x, point.y, m_hWnd);
        }
    }

    int OnCreate(LPCREATESTRUCT lpCreateStruct){
        // メニューリソースを読み込む
        menu.LoadMenu(IDR_MAINFRAME);

        // メニューバー作成
        SHMENUBARINFO mbi = {0};
        mbi.cbSize = sizeof(SHMENUBARINFO);
        mbi.hwndParent = m_hWnd;
        mbi.dwFlags = SHCMBF_HMENU;
        mbi.nToolBarId = (UINT)menu.m_hMenu;
        mbi.hInstRes = lpCreateStruct->hInstance;
        SHCreateMenuBar(&mbi);

        // メッセージループにメッセージフィルタとアイドルハンドラを追加
        CMessageLoop* pLoop = _Module.GetMessageLoop();
        pLoop->AddMessageFilter(this);
        pLoop->AddIdleHandler(this);
        return 0;
    }

    void OnDestroy(){
        // メッセージループからメッセージフィルタとアイドルハンドラを削除
        CMessageLoop* pLoop = _Module.GetMessageLoop();
        pLoop->RemoveMessageFilter(this);
        pLoop->RemoveIdleHandler(this);
        PostQuitMessage(0);
    }

    void OnRMenuAtl(UINT uNotifyCode, int nID, CWindow wndCtl){
        MessageBox(_T("Hello ATL"));
    }

    void OnRMenuWtl(UINT uNotifyCode, int nID, CWindow wndCtl){
        MessageBox(_T("Hello WTL"));
    }

    void OnLMenuClose(UINT uNotifyCode, int nID, CWindow wndCtl){
        PostMessage(WM_CLOSE);
    }
};
			

// SampleProject.cpp
#include "stdafx.h"
#include "resource.h"
#include "MainWindow.h"

CAppModule _Module;

int APIENTRY _tWinMain(HINSTANCE hInstance, 
                       HINSTANCE hPrevInstance, 
                       LPTSTR    lpCmdLine, 
                       int       nCmdShow)
{
    UNREFERENCED_PARAMETER(hPrevInstance);
    UNREFERENCED_PARAMETER(lpCmdLine);

    TCHAR szAppName[] = _T("SampleProject");

    HWND hWnd = FindWindow(szAppName, szAppName);    
    if(hWnd){
        SetForegroundWindow((HWND)((ULONG) hWnd | 0x00000001));
        return 0;
    }

    _Module.Init(NULL, hInstance);

    CMessageLoop theLoop;
    _Module.AddMessageLoop(&theLoop);

    // SIPボタンの高さを考慮したウィンドウサイズを取得
    CRect rcWindow;
    SIPINFO si = { sizeof(SIPINFO) };
    if(SipGetInfo(&si)){
        rcWindow.left = si.rcVisibleDesktop.left;
        rcWindow.top = si.rcVisibleDesktop.top;
        rcWindow.right = si.rcVisibleDesktop.right;
        rcWindow.bottom = si.rcSipRect.bottom;
    }

    CMainWindow wnd;
    wnd.Create(NULL, rcWindow, szAppName, WS_OVERLAPPEDWINDOW | WS_VISIBLE);

    int nRet = theLoop.Run();

    _Module.RemoveMessageLoop();

    _Module.Term();

    return nRet;
}
			

void OnLButtonDown(UINT nFlags, CPoint point){
    SHRGINFO info;
    info.cbSize = sizeof(SHRGINFO);
    info.hwndClient = m_hWnd;
    info.ptDown.x = point.x;
    info.ptDown.y = point.y;
    info.dwFlags = SHRG_RETURNCMD;

    if(SHRecognizeGesture(&info) == GN_CONTEXTMENU){
        CMenu menuPopup;
        menuPopup.CreatePopupMenu();
        menuPopup.AppendMenu(MF_STRING, ID_RMENU_ATL, _T("ATL"));
        menuPopup.AppendMenu(MF_STRING, ID_RMENU_WTL, _T("WTL"));
        menuPopup.TrackPopupMenu(
            TPM_LEFTALIGN | TPM_TOPALIGN, point.x, point.y, m_hWnd);
    }
}