MenuHelp

関数

メニュー選択に応じたヘルプ文字列をステータスバーに表示する。

DLLCOMCTL32.dll呼出規約winapi対応OSWindows Vista 以降

シグネチャ

// COMCTL32.dll
#include <windows.h>

void MenuHelp(
    DWORD uMsg,
    WPARAM wParam,
    LPARAM lParam,
    HMENU hMainMenu,
    HINSTANCE hInst,
    HWND hwndStatus,
    DWORD* lpwIDs
);

パラメーター

名前	型	方向
uMsg	DWORD	in
wParam	WPARAM	in
lParam	LPARAM	in
hMainMenu	HMENU	in
hInst	HINSTANCE	in
hwndStatus	HWND	in
lpwIDs	DWORD*	in

戻り値の型: void

各言語での呼び出し定義

// COMCTL32.dll
#include <windows.h>

void MenuHelp(
    DWORD uMsg,
    WPARAM wParam,
    LPARAM lParam,
    HMENU hMainMenu,
    HINSTANCE hInst,
    HWND hwndStatus,
    DWORD* lpwIDs
);

[DllImport("COMCTL32.dll", ExactSpelling = true)]
static extern void MenuHelp(
    uint uMsg,   // DWORD
    UIntPtr wParam,   // WPARAM
    IntPtr lParam,   // LPARAM
    IntPtr hMainMenu,   // HMENU
    IntPtr hInst,   // HINSTANCE
    IntPtr hwndStatus,   // HWND
    ref uint lpwIDs   // DWORD*
);

<DllImport("COMCTL32.dll", ExactSpelling:=True)>
Public Shared Sub MenuHelp(
    uMsg As UInteger,   ' DWORD
    wParam As UIntPtr,   ' WPARAM
    lParam As IntPtr,   ' LPARAM
    hMainMenu As IntPtr,   ' HMENU
    hInst As IntPtr,   ' HINSTANCE
    hwndStatus As IntPtr,   ' HWND
    ByRef lpwIDs As UInteger   ' DWORD*
)
End Sub

' uMsg : DWORD
' wParam : WPARAM
' lParam : LPARAM
' hMainMenu : HMENU
' hInst : HINSTANCE
' hwndStatus : HWND
' lpwIDs : DWORD*
Declare PtrSafe Sub MenuHelp Lib "comctl32" ( _
    ByVal uMsg As Long, _
    ByVal wParam As LongPtr, _
    ByVal lParam As LongPtr, _
    ByVal hMainMenu As LongPtr, _
    ByVal hInst As LongPtr, _
    ByVal hwndStatus As LongPtr, _
    ByRef lpwIDs As Long)
' VBA7前提(PtrSafe)。32bit Office では LongPtr→Long。Integer=16bit / Long=32bit / LongLong=64bit。

import ctypes
from ctypes import wintypes

MenuHelp = ctypes.windll.comctl32.MenuHelp
MenuHelp.restype = None
MenuHelp.argtypes = [
    wintypes.DWORD,  # uMsg : DWORD
    ctypes.c_size_t,  # wParam : WPARAM
    ctypes.c_ssize_t,  # lParam : LPARAM
    wintypes.HANDLE,  # hMainMenu : HMENU
    wintypes.HANDLE,  # hInst : HINSTANCE
    wintypes.HANDLE,  # hwndStatus : HWND
    ctypes.POINTER(wintypes.DWORD),  # lpwIDs : DWORD*
]

require 'fiddle'
require 'fiddle/import'

lib = Fiddle.dlopen('COMCTL32.dll')
MenuHelp = Fiddle::Function.new(
  lib['MenuHelp'],
  [
    -Fiddle::TYPE_INT,  # uMsg : DWORD
    Fiddle::TYPE_UINTPTR_T,  # wParam : WPARAM
    Fiddle::TYPE_INTPTR_T,  # lParam : LPARAM
    Fiddle::TYPE_VOIDP,  # hMainMenu : HMENU
    Fiddle::TYPE_VOIDP,  # hInst : HINSTANCE
    Fiddle::TYPE_VOIDP,  # hwndStatus : HWND
    Fiddle::TYPE_VOIDP,  # lpwIDs : DWORD*
  ],
  Fiddle::TYPE_VOID)

#[link(name = "comctl32")]
extern "system" {
    fn MenuHelp(
        uMsg: u32,  // DWORD
        wParam: usize,  // WPARAM
        lParam: isize,  // LPARAM
        hMainMenu: *mut core::ffi::c_void,  // HMENU
        hInst: *mut core::ffi::c_void,  // HINSTANCE
        hwndStatus: *mut core::ffi::c_void,  // HWND
        lpwIDs: *mut u32  // DWORD*
    );
}
// crates: windows-sys provides ready-made bindings for this API.

$sig = @"
[DllImport("COMCTL32.dll")]
public static extern void MenuHelp(uint uMsg, UIntPtr wParam, IntPtr lParam, IntPtr hMainMenu, IntPtr hInst, IntPtr hwndStatus, ref uint lpwIDs);
"@
$api = Add-Type -MemberDefinition $sig -Name 'COMCTL32_MenuHelp' -Namespace Win32 -PassThru
# $api::MenuHelp(uMsg, wParam, lParam, hMainMenu, hInst, hwndStatus, lpwIDs)

#uselib "COMCTL32.dll"
#func global MenuHelp "MenuHelp" sptr, sptr, sptr, sptr, sptr, sptr, sptr
; MenuHelp uMsg, wParam, lParam, hMainMenu, hInst, hwndStatus, varptr(lpwIDs)
; uMsg : DWORD -> "sptr"
; wParam : WPARAM -> "sptr"
; lParam : LPARAM -> "sptr"
; hMainMenu : HMENU -> "sptr"
; hInst : HINSTANCE -> "sptr"
; hwndStatus : HWND -> "sptr"
; lpwIDs : DWORD* -> "sptr"

出力引数:

#uselib "COMCTL32.dll"
#func global MenuHelp "MenuHelp" int, sptr, sptr, sptr, sptr, sptr, var
; MenuHelp uMsg, wParam, lParam, hMainMenu, hInst, hwndStatus, lpwIDs
; uMsg : DWORD -> "int"
; wParam : WPARAM -> "sptr"
; lParam : LPARAM -> "sptr"
; hMainMenu : HMENU -> "sptr"
; hInst : HINSTANCE -> "sptr"
; hwndStatus : HWND -> "sptr"
; lpwIDs : DWORD* -> "var"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。#uselib "COMCTL32.dll"
#func global MenuHelp "MenuHelp" int, sptr, sptr, sptr, sptr, sptr, sptr
; MenuHelp uMsg, wParam, lParam, hMainMenu, hInst, hwndStatus, varptr(lpwIDs)
; uMsg : DWORD -> "int"
; wParam : WPARAM -> "sptr"
; lParam : LPARAM -> "sptr"
; hMainMenu : HMENU -> "sptr"
; hInst : HINSTANCE -> "sptr"
; hwndStatus : HWND -> "sptr"
; lpwIDs : DWORD* -> "sptr"
; ※出力/バッファ引数はポインタ方式(token=sptr / 呼び出しは varptr(変数))。

出力引数:

; void MenuHelp(DWORD uMsg, WPARAM wParam, LPARAM lParam, HMENU hMainMenu, HINSTANCE hInst, HWND hwndStatus, DWORD* lpwIDs)
#uselib "COMCTL32.dll"
#func global MenuHelp "MenuHelp" int, intptr, intptr, intptr, intptr, intptr, var
; MenuHelp uMsg, wParam, lParam, hMainMenu, hInst, hwndStatus, lpwIDs
; uMsg : DWORD -> "int"
; wParam : WPARAM -> "intptr"
; lParam : LPARAM -> "intptr"
; hMainMenu : HMENU -> "intptr"
; hInst : HINSTANCE -> "intptr"
; hwndStatus : HWND -> "intptr"
; lpwIDs : DWORD* -> "var"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。; void MenuHelp(DWORD uMsg, WPARAM wParam, LPARAM lParam, HMENU hMainMenu, HINSTANCE hInst, HWND hwndStatus, DWORD* lpwIDs)
#uselib "COMCTL32.dll"
#func global MenuHelp "MenuHelp" int, intptr, intptr, intptr, intptr, intptr, intptr
; MenuHelp uMsg, wParam, lParam, hMainMenu, hInst, hwndStatus, varptr(lpwIDs)
; uMsg : DWORD -> "int"
; wParam : WPARAM -> "intptr"
; lParam : LPARAM -> "intptr"
; hMainMenu : HMENU -> "intptr"
; hInst : HINSTANCE -> "intptr"
; hwndStatus : HWND -> "intptr"
; lpwIDs : DWORD* -> "intptr"
; ※出力/バッファ引数はポインタ方式(token=intptr / 呼び出しは varptr(変数))。

import (
	"golang.org/x/sys/windows"
	"unsafe"
)

var (
	comctl32 = windows.NewLazySystemDLL("COMCTL32.dll")
	procMenuHelp = comctl32.NewProc("MenuHelp")
)

// uMsg (DWORD), wParam (WPARAM), lParam (LPARAM), hMainMenu (HMENU), hInst (HINSTANCE), hwndStatus (HWND), lpwIDs (DWORD*)
r1, _, err := procMenuHelp.Call(
	uintptr(uMsg),
	uintptr(wParam),
	uintptr(lParam),
	uintptr(hMainMenu),
	uintptr(hInst),
	uintptr(hwndStatus),
	uintptr(lpwIDs),
)
_ = err  // syscall.Errno (valid when the call sets last-error)
_ = r1   // void

procedure MenuHelp(
  uMsg: DWORD;   // DWORD
  wParam: NativeUInt;   // WPARAM
  lParam: NativeInt;   // LPARAM
  hMainMenu: THandle;   // HMENU
  hInst: THandle;   // HINSTANCE
  hwndStatus: THandle;   // HWND
  lpwIDs: Pointer   // DWORD*
); stdcall;
  external 'COMCTL32.dll' name 'MenuHelp';

result := DllCall("COMCTL32\MenuHelp"
    , "UInt", uMsg   ; DWORD
    , "UPtr", wParam   ; WPARAM
    , "Ptr", lParam   ; LPARAM
    , "Ptr", hMainMenu   ; HMENU
    , "Ptr", hInst   ; HINSTANCE
    , "Ptr", hwndStatus   ; HWND
    , "Ptr", lpwIDs   ; DWORD*
    , "Int")   ; return: void

●MenuHelp(uMsg, wParam, lParam, hMainMenu, hInst, hwndStatus, lpwIDs) = DLL("COMCTL32.dll", "int MenuHelp(dword, int, int, void*, void*, void*, void*)")
# 呼び出し: MenuHelp(uMsg, wParam, lParam, hMainMenu, hInst, hwndStatus, lpwIDs)
# uMsg : DWORD -> "dword"
# wParam : WPARAM -> "int"
# lParam : LPARAM -> "int"
# hMainMenu : HMENU -> "void*"
# hInst : HINSTANCE -> "void*"
# hwndStatus : HWND -> "void*"
# lpwIDs : DWORD* -> "void*"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。