ImmGetConversionListA

// IMM32.dll  (ANSI / -A)
#include <windows.h>

DWORD ImmGetConversionListA(
    HKL param0,
    HIMC param1,
    LPCSTR lpSrc,
    CANDIDATELIST* lpDst,
    DWORD dwBufLen,
    GET_CONVERSION_LIST_FLAG uFlag
);

<DllImport("IMM32.dll", CharSet:=CharSet.Ansi, ExactSpelling:=True)>
Public Shared Function ImmGetConversionListA(
    param0 As IntPtr,   ' HKL
    param1 As IntPtr,   ' HIMC
    <MarshalAs(UnmanagedType.LPStr)> lpSrc As String,   ' LPCSTR
    lpDst As IntPtr,   ' CANDIDATELIST* out
    dwBufLen As UInteger,   ' DWORD
    uFlag As UInteger   ' GET_CONVERSION_LIST_FLAG
) As UInteger
End Function

' param0 : HKL
' param1 : HIMC
' lpSrc : LPCSTR
' lpDst : CANDIDATELIST* out
' dwBufLen : DWORD
' uFlag : GET_CONVERSION_LIST_FLAG
Declare PtrSafe Function ImmGetConversionListA Lib "imm32" ( _
    ByVal param0 As LongPtr, _
    ByVal param1 As LongPtr, _
    ByVal lpSrc As String, _
    ByVal lpDst As LongPtr, _
    ByVal dwBufLen As Long, _
    ByVal uFlag As Long) As Long
' VBA7前提(PtrSafe)。32bit Office では LongPtr→Long。Integer=16bit / Long=32bit / LongLong=64bit。

import ctypes
from ctypes import wintypes

ImmGetConversionListA = ctypes.windll.imm32.ImmGetConversionListA
ImmGetConversionListA.restype = wintypes.DWORD
ImmGetConversionListA.argtypes = [
    wintypes.HANDLE,  # param0 : HKL
    wintypes.HANDLE,  # param1 : HIMC
    wintypes.LPCSTR,  # lpSrc : LPCSTR
    ctypes.c_void_p,  # lpDst : CANDIDATELIST* out
    wintypes.DWORD,  # dwBufLen : DWORD
    wintypes.DWORD,  # uFlag : GET_CONVERSION_LIST_FLAG
]

require 'fiddle'
require 'fiddle/import'

lib = Fiddle.dlopen('IMM32.dll')
ImmGetConversionListA = Fiddle::Function.new(
  lib['ImmGetConversionListA'],
  [
    Fiddle::TYPE_VOIDP,  # param0 : HKL
    Fiddle::TYPE_VOIDP,  # param1 : HIMC
    Fiddle::TYPE_VOIDP,  # lpSrc : LPCSTR
    Fiddle::TYPE_VOIDP,  # lpDst : CANDIDATELIST* out
    -Fiddle::TYPE_INT,  # dwBufLen : DWORD
    -Fiddle::TYPE_INT,  # uFlag : GET_CONVERSION_LIST_FLAG
  ],
  -Fiddle::TYPE_INT)

#[link(name = "imm32")]
extern "system" {
    fn ImmGetConversionListA(
        param0: *mut core::ffi::c_void,  // HKL
        param1: *mut core::ffi::c_void,  // HIMC
        lpSrc: *const u8,  // LPCSTR
        lpDst: *mut CANDIDATELIST,  // CANDIDATELIST* out
        dwBufLen: u32,  // DWORD
        uFlag: u32  // GET_CONVERSION_LIST_FLAG
    ) -> u32;
}
// crates: windows-sys provides ready-made bindings for this API.

$sig = @"
[DllImport("IMM32.dll", CharSet = CharSet.Ansi)]
public static extern uint ImmGetConversionListA(IntPtr param0, IntPtr param1, [MarshalAs(UnmanagedType.LPStr)] string lpSrc, IntPtr lpDst, uint dwBufLen, uint uFlag);
"@
$api = Add-Type -MemberDefinition $sig -Name 'IMM32_ImmGetConversionListA' -Namespace Win32 -PassThru
# $api::ImmGetConversionListA(param0, param1, lpSrc, lpDst, dwBufLen, uFlag)

#uselib "IMM32.dll"
#func global ImmGetConversionListA "ImmGetConversionListA" sptr, sptr, sptr, sptr, sptr, sptr
; ImmGetConversionListA param0, param1, lpSrc, varptr(lpDst), dwBufLen, uFlag   ; 戻り値は stat
; param0 : HKL -> "sptr"
; param1 : HIMC -> "sptr"
; lpSrc : LPCSTR -> "sptr"
; lpDst : CANDIDATELIST* out -> "sptr"
; dwBufLen : DWORD -> "sptr"
; uFlag : GET_CONVERSION_LIST_FLAG -> "sptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。

#uselib "IMM32.dll"
#cfunc global ImmGetConversionListA "ImmGetConversionListA" sptr, sptr, str, var, int, int
; res = ImmGetConversionListA(param0, param1, lpSrc, lpDst, dwBufLen, uFlag)
; param0 : HKL -> "sptr"
; param1 : HIMC -> "sptr"
; lpSrc : LPCSTR -> "str"
; lpDst : CANDIDATELIST* out -> "var"
; dwBufLen : DWORD -> "int"
; uFlag : GET_CONVERSION_LIST_FLAG -> "int"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。

; DWORD ImmGetConversionListA(HKL param0, HIMC param1, LPCSTR lpSrc, CANDIDATELIST* lpDst, DWORD dwBufLen, GET_CONVERSION_LIST_FLAG uFlag)
#uselib "IMM32.dll"
#cfunc global ImmGetConversionListA "ImmGetConversionListA" intptr, intptr, str, var, int, int
; res = ImmGetConversionListA(param0, param1, lpSrc, lpDst, dwBufLen, uFlag)
; param0 : HKL -> "intptr"
; param1 : HIMC -> "intptr"
; lpSrc : LPCSTR -> "str"
; lpDst : CANDIDATELIST* out -> "var"
; dwBufLen : DWORD -> "int"
; uFlag : GET_CONVERSION_LIST_FLAG -> "int"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。

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

var (
	imm32 = windows.NewLazySystemDLL("IMM32.dll")
	procImmGetConversionListA = imm32.NewProc("ImmGetConversionListA")
)

// param0 (HKL), param1 (HIMC), lpSrc (LPCSTR), lpDst (CANDIDATELIST* out), dwBufLen (DWORD), uFlag (GET_CONVERSION_LIST_FLAG)
r1, _, err := procImmGetConversionListA.Call(
	uintptr(param0),
	uintptr(param1),
	uintptr(unsafe.Pointer(windows.BytePtrFromString(lpSrc))),
	uintptr(lpDst),
	uintptr(dwBufLen),
	uintptr(uFlag),
)
_ = err  // syscall.Errno (valid when the call sets last-error)
_ = r1   // DWORD

function ImmGetConversionListA(
  param0: THandle;   // HKL
  param1: THandle;   // HIMC
  lpSrc: PAnsiChar;   // LPCSTR
  lpDst: Pointer;   // CANDIDATELIST* out
  dwBufLen: DWORD;   // DWORD
  uFlag: DWORD   // GET_CONVERSION_LIST_FLAG
): DWORD; stdcall;
  external 'IMM32.dll' name 'ImmGetConversionListA';

result := DllCall("IMM32\ImmGetConversionListA"
    , "Ptr", param0   ; HKL
    , "Ptr", param1   ; HIMC
    , "AStr", lpSrc   ; LPCSTR
    , "Ptr", lpDst   ; CANDIDATELIST* out
    , "UInt", dwBufLen   ; DWORD
    , "UInt", uFlag   ; GET_CONVERSION_LIST_FLAG
    , "UInt")   ; return: DWORD

●ImmGetConversionListA(param0, param1, lpSrc, lpDst, dwBufLen, uFlag) = DLL("IMM32.dll", "dword ImmGetConversionListA(void*, void*, char*, void*, dword, dword)")
# 呼び出し: ImmGetConversionListA(param0, param1, lpSrc, lpDst, dwBufLen, uFlag)
# param0 : HKL -> "void*"
# param1 : HIMC -> "void*"
# lpSrc : LPCSTR -> "char*"
# lpDst : CANDIDATELIST* out -> "void*"
# dwBufLen : DWORD -> "dword"
# uFlag : GET_CONVERSION_LIST_FLAG -> "dword"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。