Language-Haskell
view release on metacpan or search on metacpan
hugs98-Nov2003/src/winhugs/menusbm.c view on Meta::CPAN
SelectObject(hdc, hbrOld);
}
// Function-pointer type for drawing functions
typedef VOID (WINAPI * DRAWFUNC)(HDC hdc, SIZE size);
HBITMAP WINAPI CreateMenuBitmap(DRAWFUNC lpfnDraw)
{
// Create a DC compatible with the desktop window's DC.
HWND hwndDesktop = GetDesktopWindow();
HDC hdcDesktop = GetDC(hwndDesktop);
HDC hdcMem = CreateCompatibleDC(hdcDesktop);
// Determine the required bitmap size.
DWORD dwExt = GetMenuCheckMarkDimensions();
SIZE size = { LOWORD(dwExt), HIWORD(dwExt) };
( run in 0.214 second using v1.01-cache-2.11-cpan-299005ec8e3 )