potisanのプログラミングメモ

趣味のプログラマーがプログラミング関係で気になったことや調べたことをいつでも忘れられるようにメモするブログです。

C++20&Win API ドロップされたOLEデータオブジェクトのクリップボード形式を列挙する

エクスプローラーやブラウザからドロップされたデータのデータ形式を列挙するサンプルコードです。Windowsプロジェクトでのウィンドウクラスの登録、ウィンドウの表示、複数行テキストボックスだけ持つウィンドウの実装、IUnknownクラスの実装サンプルとしても使えるかもしれません。

#define STRICT
#include <Windows.h>

#include <bit>
#include <format>
#include <vector>
#include <string>

auto MY_WINDOW_CLASS_NAME{ L"Project1" };
auto MY_WINDOW_WINDOW_NAME{ L"Project1" };

LRESULT CALLBACK MyWndProc(HWND hWnd, UINT uiMsg, WPARAM wParam, LPARAM lParam);

int WINAPI wWinMain(HINSTANCE, HINSTANCE, LPWSTR, int nCmdShow)
{
    if (HRESULT hr = OleInitialize(nullptr); FAILED(hr))
        return hr;

    WNDCLASSEX wce{
        sizeof(wce),
        0,
        MyWndProc,
        0,
        0,
        nullptr,
        LoadIcon(nullptr, IDI_APPLICATION),
        LoadCursor(nullptr, IDC_ARROW),
        reinterpret_cast<HBRUSH>(COLOR_3DFACE + 1),
        nullptr,
        MY_WINDOW_CLASS_NAME,
        LoadIcon(nullptr, IDI_APPLICATION) };
    if (!RegisterClassEx(&wce))
        return 0;

    auto hWnd{ CreateWindowEx(
        WS_EX_OVERLAPPEDWINDOW,
        MY_WINDOW_CLASS_NAME,
        MY_WINDOW_WINDOW_NAME,
        WS_OVERLAPPEDWINDOW,
        CW_USEDEFAULT, CW_USEDEFAULT,
        CW_USEDEFAULT, CW_USEDEFAULT,
        nullptr,
        nullptr,
        nullptr,
        nullptr) };
    ShowWindow(hWnd, nCmdShow);
    UpdateWindow(hWnd);

    MSG msg;
    while (GetMessage(&msg, nullptr, 0, 0) > 0)
    {
        TranslateMessage(&msg);
        DispatchMessage(&msg);
    }

    OleUninitialize();

    return static_cast<int>(msg.wParam);
}

template<DWORD INIT = 256, DWORD EXPANDING = 256>
std::wstring GetClipboardFormatNameW(CLIPFORMAT cf)
{
    std::wstring buffer;
    for (DWORD size = INIT;; size += EXPANDING)
    {
        buffer.resize(size);
        auto copied{ GetClipboardFormatNameW(cf, buffer.data(), size) };
        if (copied != buffer.size() - 1)
        {
            buffer.resize(copied);
            buffer.shrink_to_fit();
            return std::move(buffer);
        }
    }
}

// https://docs.microsoft.com/ja-jp/windows/desktop/api/oleidl/nn-oleidl-idroptarget
class CMyDropTarget : public IDropTarget
{
private:
    ULONG m_ref;
    HWND m_hwndEdit;

    CMyDropTarget() {}

public:
    CMyDropTarget(HWND hwndEdit)
        : m_ref(1), m_hwndEdit(hwndEdit)
    {
    }

    HRESULT QueryInterface(
        REFIID riid,
        void** ppvObject)
    {
        if (IsEqualIID(riid, __uuidof(IUnknown)))
        {
            *ppvObject = static_cast<IUnknown*>(this);
        }
        else if (IsEqualIID(riid, __uuidof(IDropTarget)))
        {
            *ppvObject = static_cast<IDropTarget*>(this);
        }
        else
        {
            return E_NOINTERFACE;
        }
        AddRef();
        return S_OK;
    }

    ULONG AddRef()
    {
        return InterlockedIncrement(&m_ref);
    }

    ULONG Release(void)
    {
        if (InterlockedDecrement(&m_ref) == 0)
        {
            delete this;
            return 0;
        }
        return m_ref;
    }

    HRESULT STDMETHODCALLTYPE DragEnter(
        IDataObject* pDataObj,
        DWORD grfKeyState,
        POINTL pt,
        DWORD* pdwEffect)
    {
        *pdwEffect = DROPEFFECT_LINK;
        return S_OK;
    }

    HRESULT DragOver(
        DWORD grfKeyState,
        POINTL pt,
        DWORD* pdwEffect)
    {
        return S_OK;
    }

    HRESULT DragLeave()
    {
        return S_OK;
    }

    HRESULT Drop(
        IDataObject* pDataObj,
        DWORD grfKeyState,
        POINTL pt,
        DWORD* pdwEffect)
    {
        std::vector<CLIPFORMAT> cfs;

        IEnumFORMATETC* pEnumFormatEtc{ nullptr };
        if (SUCCEEDED(pDataObj->EnumFormatEtc(DATADIR::DATADIR_GET, &pEnumFormatEtc)))
        {
            FORMATETC fmtetc;
            while (pEnumFormatEtc->Next(1, &fmtetc, nullptr) == S_OK)
            {
                cfs.push_back(fmtetc.cfFormat);
            }
            pEnumFormatEtc->Release();
        }

        std::wstring buffer;
        for (auto& cf : cfs)
        {
            auto name = GetClipboardFormatNameW(cf);
            buffer.append(std::format(L"{:04X} ({})\r\n", cf, name));
        }
        SetWindowText(m_hwndEdit, buffer.c_str());

        *pdwEffect = DROPEFFECT_LINK;
        return S_OK;
    }

    HWND GetEditWindowHandle() const
    {
        return m_hwndEdit;
    }
};

CMyDropTarget* pDropTarget{ nullptr };

LRESULT CALLBACK MyWndProc(HWND hWnd, UINT uiMsg, WPARAM wParam, LPARAM lParam)
{
    switch (uiMsg)
    {
    case WM_CREATE:
        {
            // データ表示用のテキストボックス作成
            auto hwndEdit1{ CreateWindowExW(
                WS_EX_CLIENTEDGE,
                L"edit",
                L"ファイルやURLをドロップしてください。",
                WS_CHILD | WS_VISIBLE | WS_HSCROLL | WS_VSCROLL | ES_MULTILINE,
                0, 0, 0, 0,
                hWnd,
                nullptr,
                nullptr,
                nullptr) };
            SendMessage(hwndEdit1, WM_SETFONT,
                std::bit_cast<WPARAM>(GetStockObject(DEFAULT_GUI_FONT)),
                MAKELPARAM(FALSE, 0));
            // ドロップ対象として登録
            pDropTarget = new CMyDropTarget(hwndEdit1);
            RegisterDragDrop(hWnd, pDropTarget);
            pDropTarget->Release();
            return 0;
        }
    case WM_DESTROY:
        PostQuitMessage(0);
        return 0;
    case WM_QUIT:
        RevokeDragDrop(hWnd);
        return 0;
    case WM_SIZE:
        MoveWindow(
            pDropTarget->GetEditWindowHandle(),
            0, 0,
            LOWORD(lParam), HIWORD(lParam),
            TRUE);
        return 0;
    }

    return DefWindowProc(hWnd, uiMsg, wParam, lParam);
}