易语言自绘WIN10菜单源码

系统结构:WndProc,LOWORD,HIWORD,SetWindowLong,CallWindowProc,RtlMoveMemory_MEASUREITEMSTRUCT1,RtlMoveMemory_MEASUREITEMSTRUCT2,GetMenuItemCount,GetMenuItemInfo,SetMenuItemInfo,RtlMoveMemory_DRAWITEMSTRUCT,CreateSolidBrush,FillRect,DeleteObject,GetMenuInfo,SetMenuInfo,GetStockObject,GetMenuString,SetBkMode,DrawText,InsertMenu,

======窗口程序集_启动窗口
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ WndProc
           |  |
           |  |------ LOWORD
           |  |
           |  |------ HIWORD
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   SetWindowLong
           |  |
           |  |---[dll]------   CallWindowProc
           |  |
           |  |---[dll]------   RtlMoveMemory_MEASUREITEMSTRUCT1
           |  |
           |  |---[dll]------   RtlMoveMemory_MEASUREITEMSTRUCT2
           |  |
           |  |---[dll]------   GetMenuItemCount
           |  |
           |  |---[dll]------   GetMenuItemInfo
           |  |
           |  |---[dll]------   SetMenuItemInfo
           |  |
           |  |---[dll]------   RtlMoveMemory_DRAWITEMSTRUCT
           |  |
           |  |---[dll]------   CreateSolidBrush
           |  |
           |  |---[dll]------   FillRect
           |  |
           |  |---[dll]------   DeleteObject
           |  |
           |  |---[dll]------   GetMenuInfo
           |  |
           |  |---[dll]------   SetMenuInfo
           |  |
           |  |---[dll]------   GetStockObject
           |  |
           |  |---[dll]------   GetMenuString
           |  |
           |  |---[dll]------   SetBkMode
           |  |
           |  |---[dll]------   DrawText
           |  |
           |  |---[dll]------   InsertMenu

调用的DLL命令:

.DLL命令 SetWindowLong, 整数型, "user32.dll", "SetWindowLongA"
    .参数 hWnd, 整数型
    .参数 nIndex, 整数型
    .参数 dwNewLong, 整数型

.DLL命令 CallWindowProc, 整数型, "user32.dll", "CallWindowProcA"
    .参数 lpPrevWndFunc, 整数型
    .参数 hWnd, 整数型
    .参数 Msg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 整数型

.DLL命令 RtlMoveMemory_MEASUREITEMSTRUCT1, , "kernel32.dll", "RtlMoveMemory"
    .参数 Destination, MEASUREITEMSTRUCT, 传址
    .参数 Source, 整数型
    .参数 Length, 整数型

.DLL命令 RtlMoveMemory_MEASUREITEMSTRUCT2, , "kernel32.dll", "RtlMoveMemory"
    .参数 Destination, 整数型
    .参数 Source, MEASUREITEMSTRUCT, 传址
    .参数 Length, 整数型

.DLL命令 GetMenuItemCount, 整数型, "user32.dll", "GetMenuItemCount"
    .参数 hMenu, 整数型

.DLL命令 GetMenuItemInfo, 逻辑型, "user32.dll", "GetMenuItemInfoA"
    .参数 hMenu, 整数型
    .参数 uItem, 整数型
    .参数 fByPosition, 逻辑型
    .参数 lpmii, MENUITEMINFO

.DLL命令 SetMenuItemInfo, 逻辑型, "user32.dll", "SetMenuItemInfoA"
    .参数 hMenu, 整数型
    .参数 uItem, 整数型
    .参数 fByPosition, 逻辑型
    .参数 lpmii, MENUITEMINFO

.DLL命令 RtlMoveMemory_DRAWITEMSTRUCT, , "kernel32.dll", "RtlMoveMemory"
    .参数 Destination, DRAWITEMSTRUCT, 传址
    .参数 Source, 整数型
    .参数 Length, 整数型

.DLL命令 CreateSolidBrush, 整数型, "gdi32.dll", "CreateSolidBrush"
    .参数 crColor, 整数型

.DLL命令 FillRect, 逻辑型, "user32.dll", "FillRect"
    .参数 hdc, 整数型
    .参数 lpRect, RECT
    .参数 hBrush, 整数型

.DLL命令 DeleteObject, 逻辑型, "gdi32.dll", "DeleteObject"
    .参数 hObject, 整数型

.DLL命令 GetMenuInfo, 逻辑型, "user32.dll", "GetMenuInfo"
    .参数 hMenu, 整数型
    .参数 lpcmi, MENUINFO, 传址

.DLL命令 SetMenuInfo, 逻辑型, "user32.dll", "SetMenuInfo"
    .参数 hMenu, 整数型
    .参数 lpcmi, MENUINFO, 传址

.DLL命令 GetStockObject, 整数型, "gdi32.dll", "GetStockObject"
    .参数 nIndex, 整数型

.DLL命令 GetMenuString, 整数型, "user32.dll", "GetMenuStringA"
    .参数 hMenu, 整数型
    .参数 uIDItem, 整数型
    .参数 lpString, 文本型
    .参数 nMaxCount, 整数型
    .参数 uFlag, 整数型

.DLL命令 SetBkMode, 整数型, "gdi32.dll", "SetBkMode"
    .参数 hdc, 整数型
    .参数 nBkMode, 整数型

.DLL命令 DrawText, 整数型, "user32.dll", "DrawTextA"
    .参数 hDC, 整数型
    .参数 lpchText, 文本型
    .参数 nCount, 整数型
    .参数 lpRect, RECT
    .参数 uFormat, 整数型

.DLL命令 InsertMenu, 逻辑型, "user32.dll", "InsertMenuA"
    .参数 hMenu, 整数型
    .参数 uPosition, 整数型
    .参数 uFlags, 整数型
    .参数 uIDNewItem, 整数型
    .参数 lpNewItem, 整数型